重命名r中拆分组的标题

我想知道如何更改拆分组的标题名

original_string <- c("x=2", "y=2","z=34")  
splt <- strsplit(original_string, "=")  
r<- lapply(splt, function(x) assign(x[1], as.numeric(x[2]), envir = globalenv()))  
d1 <- data.frame(r)
d1 

是否可以将标题重命名为：

  Tom Jerry Jane  
1  2    2    34

我怎样才能做到？

---

非常感谢。

我们可以使用

setNames

setNames(d1, c('Tom', 'Jerry', 'Jane'))

或

---

colnames（d1）您正在寻找这样的产品吗：

library(dplyr)
library(tidyr)

data_frame(variable_value = original_string) %>%
  separate(variable_value,
           c("variable", "value")) %>%
  mutate(ID = 1) %>%
  spread(variable, value) %>%
  rename(Tom = x, 
         Jerry = y, 
         Jane = z)

我看到您创建了一个数据帧。可以使用更改列的标题

names(df) # this shows what the names are

和

names(df) <- c("Tom", "Jerry", "Jane") #you change the names

names（df）如果你最后只想做
data.frame（r）
，为什么要给全局环境赋值？你可以做：
data.frame（“setNames中的namesError（v1，c（“Tom”，“Jerry”，“Jane”））：找不到对象“v1”它似乎不工作。@我将对象重命名为
d1，并添加了一条重命名语句。变量已经有语义上有意义的名称x、y和z。setNames方法的缺点是它依赖于原始字符串中变量的顺序。
names(df) # this shows what the names are

names(df) <- c("Tom", "Jerry", "Jane") #you change the names