1

以下原则是否有更短的版本来重命名数据框的某些列？

data1<-data.frame("a"=1:3,"b"=1:3,"c"=1:3)

data1Names<-names(data1)
data1Names[data1Names=="a"]<-"hello"
data1Names[data1Names=="c"]<-"world"
names(data1)<-data1Names
4

4 回答 4

5

该data.table软件包具有可用于的setnames功能data.frames

library(data.table)
data1<-data.frame("a"=1:3,"b"=1:3,"c"=1:3)
#setnames(data1, "a", "hello")
#setnames(data1, "c", "world")
# or in one step
setnames(data1, c("a", "c"), c("hello", "world"))
data1
#  hello b world
#1     1 1     1
#2     2 2     2
#3     3 3     3

到目前为止的所有答案都将复制data.frame. setnames另一个好处是它通过引用更改名称，而无需复制 data.frame。

于 2013-09-19T15:26:37.447 回答
4

setNames可能会有所帮助

> setNames(data1, c("hello", "b", "world"))
  hello b world
1     1 1     1
2     2 2     2
3     3 3     3

另一种选择

> names(data1)[names(data1) %in% c("a", "c")] <- c("hello", "world")
> data1
  hello b world
1     1 1     1
2     2 2     2
3     3 3     3
于 2013-09-19T15:14:10.263 回答
4

用于match替换选定元素并在使用时遵守顺序names<-...

names(data1)[ match( c("a", "c") , names(data1) ) ] <- c("hello", "world")
#  hello b world
#1     1 1     1
#2     2 2     2
#3     3 3     3

交换所需的重命名顺序...

names(data1)[ match( c("c", "a") , names(data1) ) ] <- c("hello", "world")
#  world b hello
#1     1 1     1
#2     2 2     2
#3     3 3     3
于 2013-09-19T15:24:50.870 回答
3

您可以rename从plyr包中使用：

data1<-data.frame("a"=1:3,"b"=1:3,"c"=1:3)
> rename(data1,c('a' = 'hello','b' = 'world'))
  hello world c
1     1     1 1
2     2     2 2
3     3     3 3
于 2013-09-19T15:16:50.930 回答