replace为dplyr中的“重命名”

我喜欢plyr的重命名函数rename 。 我最近开始使用dplyr,并想知道是否有一种简单的方法来使用dplyr中的函数重命名variables,这与plyr的rename一样简单易用。

4 Solutions collect form web for “replace为dplyr中的“重命名””

dplyr版本0.3添加了一个新的rename()函数,其工作方式就像plyr::rename()

 df <- rename(df, new_name = old_name) 

下一个版本的dplyr将支持select的改进版本:

 > mtcars2 <- select( mtcars, disp2 = disp ) > head( mtcars2 ) disp2 Mazda RX4 160 Mazda RX4 Wag 160 Datsun 710 108 Hornet 4 Drive 258 Hornet Sportabout 360 Valiant 225 > changes( mtcars, mtcars2 ) Changed variables: old new disp 0x105500400 disp2 0x105500400 Changed attributes: old new names 0x106d2cf50 0x106d28a98 

你实际上可以使用plyrrename函数作为dplyr链的一部分。 我认为每个函数a)将data.frame作为第一个参数,并且b)返回data.frame用于链接。 这里是一个例子:

 library('plyr') library('dplyr') DF = data.frame(var=1:5) DF %>% # `rename` from `plyr` rename(c('var'='x')) %>% # `mutate` from `dplyr` (note order in which libraries are loaded) mutate(x.sq=x^2) # x x.sq # 1 1 1 # 2 2 4 # 3 3 9 # 4 4 16 # 5 5 25 

更新:当前版本的dplyr支持直接作为select函数的一部分进行重命名(参见上面的Romain Francois的文章)。 有关使用非dplyr函数作为dplyr链的一部分的一般说法仍然有效,虽然rename是一个有趣的例子。

它在dplyr(尚未)列为函数: http ://cran.rstudio.org/web/packages/dplyr/dplyr.pdf

如果你不想加载plyr和dplyr,下面的函数(几乎)是一样的

 rename <- function(dat, oldnames, newnames) { datnames <- colnames(dat) datnames[which(datnames %in% oldnames)] <- newnames colnames(dat) <- datnames dat } dat <- rename(mtcars,c("mpg","cyl"), c("mympg","mycyl")) head(dat) mympg mycyl disp hp drat wt qsec vs am gear carb Mazda RX4 21.0 6 160 110 3.90 2.620 16.46 0 1 4 4 Mazda RX4 Wag 21.0 6 160 110 3.90 2.875 17.02 0 1 4 4 Datsun 710 22.8 4 108 93 3.85 2.320 18.61 1 1 4 1 Hornet 4 Drive 21.4 6 258 110 3.08 3.215 19.44 1 0 3 1 Hornet Sportabout 18.7 8 360 175 3.15 3.440 17.02 0 0 3 2 Valiant 18.1 6 225 105 2.76 3.460 20.22 1 0 3 1 

编辑:由罗曼的评论产生以下(注意,更改function需要dplyr .1.1)

 > dplyr:::changes(mtcars, dat) Changed variables: old new disp 0x108b4b0e0 0x108b4e370 hp 0x108b4b210 0x108b4e4a0 drat 0x108b4b340 0x108b4e5d0 wt 0x108b4b470 0x108b4e700 qsec 0x108b4b5a0 0x108b4e830 vs 0x108b4b6d0 0x108b4e960 am 0x108b4b800 0x108b4ea90 gear 0x108b4b930 0x108b4ebc0 carb 0x108b4ba60 0x108b4ecf0 mpg 0x1033ee7c0 cyl 0x10331d3d0 mympg 0x108b4e110 mycyl 0x108b4e240 Changed attributes: old new names 0x10c100558 0x10c2ea3f0 row.names 0x108b4bb90 0x108b4ee20 class 0x103bd8988 0x103bd8f58 
  • 提取一个dplyr tbl列作为一个向量
  • 修复多个警告“未知列”
  • 如何通过do函数对某些列中不同数量的string进行分解
  • dplyr summarise_each与na.rm
  • 可以使用dplyr包进行有条件的变异吗?
  • data.table vs dplyr:一个人可以做些什么,另一个不行或者做得不好?
  • dplyr中的mutate_each / summarise_each:如何select某些列并为突变的列赋予新的名称?
  • R - dplyr - mutate - 使用dynamicvariables名称
  • 独特的行,考虑两列,在R,没有秩序
  • 反向堆积的酒吧顺序
  • 滚动平均(移动平均)由组/ id与dplyr