답변:
dplyr 버전 0.3 rename()은 plyr::rename().
df <- rename(df, new_name = old_name)dplyr::rename(iris, petal_length = Petal.Length).
iris <- dplyr::rename(iris, petal_length = Petal.Length)하며 rename ()은 예를 들어 dplyr::rename(iris, petal_length = "petal length")오류를 생성하는 공백이있는 변수 이름을 처리하지 않습니다 .
setNames(): 당신이 도매 열 이름을 교체하는 경우df %>% mutate(foo = 1 +2) %>% setNames(c("blah", "blu", "bar"))
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 0x106d28a98changes가 내보내집니다 (또는 내 보내야 함)
plyr의 이름 바꾸기 기능이 사용 "old"="new"하는 반면 나머지 dplyr 기능과 일관성을 유지 하는 dplyr사용 이기 때문에 이것은 사용자 부분에 대한 생각의 변화를 의미 new=old합니다. 개인적으로 저는 이것이 문제라고 생각하지 않습니다. 특히 데이터 처리 속도가 크게 빨라질 때 새로운 것에 빠르게 익숙해집니다.
select. 모든 변수를 선택하고이 열의 이름을 바꾸는 것이 확실하지 않습니다.
select실제로 동작 하는 방식을 반영하도록 게시물을 편집 할 수 있습니까? dplyr모든 변수를 유지하고 하나 또는 둘의 이름을 바꾸는 쉬운 방법 에 대한 투표를했습니다 . :) 지금은 계속로드 plyr하고 사용할 것 rename입니다.
mtcars %>% select(matches(".*"),disp2=disp). 나는 더 간결한 솔루션을 원하지만 이것은 작동하고 모든 열을 보존합니다 (순서는 아니지만). disp중복되지 않습니다.
실제로 사용할 수 있습니다 plyr 의 rename기능을 dplyr체인의 일부로 . 나는 data.framea) a를 첫 번째 인수로 취하고 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편집 : Romain의 주석은 다음을 생성합니다 (변경 기능에는 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 0x103bd8f58mtcars...하지만 상당한 데이터를 다루는 경우에는 상당히 극적입니다. 확인dplyr:::changes(mtcars, dat)
정확히 이름을 바꾸지는 않지만 dplyr::select_all()열 이름을 다시 형식화하는 데 사용할 수 있습니다. 이 예제는 공백과 마침표를 밑줄로 바꾸고 모든 것을 소문자로 변환합니다.
iris %>%
select_all(~gsub("\\s+|\\.", "_", .)) %>%
select_all(tolower) %>%
head(2)
sepal_length sepal_width petal_length petal_width species
1 5.1 3.5 1.4 0.2 setosa
2 4.9 3.0 1.4 0.2 setosa
rename(TheDataFrame,OldVarName=NewVarName)있지만 나는Error: Unknown variables: NewVarName.이유를 이해하지 못한다.