data.frame에서 단일 열의 이름을 바꾸는 방법은 무엇입니까?

열이 두 개 이상인 데이터 프레임이 있으면 사용할 수 있습니다.

colnames(x) <- c("col1","col2")

열 이름을 바꿉니다. 열이 하나 인 경우 어떻게해야합니까? 열이 하나 뿐인 벡터 또는 데이터 프레임을 의미합니다.

예:

trSamp <- data.frame(sample(trainer$index, 10000))
head(trSamp )
#   sample.trainer.index..10000.
# 1                      5907862
# 2                      2181266
# 3                      7368504
# 4                      1949790
# 5                      3475174
# 6                      6062879

ncol(trSamp)
# [1] 1
class(trSamp)
# [1] "data.frame"
class(trSamp[1])
# [1] "data.frame"
class(trSamp[,1])
# [1] "numeric"
colnames(trSamp)[2] <- "newname2"
# Error in names(x) <- value : 
#   'names' attribute [2] must be the same length as the vector [1]

colnames(trSamp)[2] <- "newname2"

두 번째 열의 이름을 설정하려고 시도합니다. 객체에는 하나의 열만 있으므로 명령에서 오류가 발생합니다. 이것으로 충분합니다 :

colnames(trSamp) <- "newname2"

이것은 변수의 정확한 위치를 기억할 필요가없는 일반적인 방법입니다.

# df = dataframe
# old.var.name = The name you don't like anymore
# new.var.name = The name you want to get

names(df)[names(df) == 'old.var.name'] <- 'new.var.name'

이 코드는 거의 다음을 수행합니다.

1. names(df) 의 모든 이름을 살펴 본다 df
2. [names(df) == old.var.name] 확인할 변수 이름을 추출합니다.
3. <- 'new.var.name' 새 변수 이름을 할당합니다.

colnames(df)[colnames(df) == 'oldName'] <- 'newName'

이것은 오래된 질문이지만 이제 패키지 setnames에서 사용할 수 있다는 점에 주목할 가치가 있습니다 data.table.

library(data.table)

setnames(DF, "oldName", "newName")

# or since the data.frame in question is just one column: 
setnames(DF, "newName")

# And for reference's sake, in general (more than once column)
nms <- c("col1.name", "col2.name", etc...)
setnames(DF, nms)

이것은 또한 Hadley의 plyr패키지와 rename기능을 사용하여 수행 할 수 있습니다 .

library(plyr) 
df <- data.frame(foo=rnorm(1000)) 
df <- rename(df,c('foo'='samples'))

위치를 알 필요없이 이름으로 이름을 바꾸고 한 번에 여러 이름을 바꿀 수 있습니다. 예를 들어 병합을 수행 한 후에는 다음과 같이 끝날 수 있습니다.

  letterid id.x id.y
1       70    2    1
2      116    6    5
3      116    6    4
4      116    6    3
5      766   14    9
6      766   14   13

다음을 사용하여 한 단계로 이름을 바꿀 수 있습니다.

letters <- rename(letters,c("id.x" = "source", "id.y" = "target"))

  letterid source target
1       70      2      1
2      116      6      5
3      116      6      4
4      116      6      3
5      766     14      9
6      766     14     13

열 이름을 바꾸는 가장 좋은 방법은 다음과 같이 dplyr 패키지 를 사용하는 것입니다.

require(dplyr)
df = rename(df, new_col01 = old_col01, new_col02 = old_col02, ...)

모든 데이터 세트에서 하나 이상의 열 이름을 바꾸는 경우에도 동일하게 작동합니다.

데이터 프레임 열 이름을 하나씩 바꾸는 다음 스타일이 마음에 듭니다.

colnames(df)[which(colnames(df) == 'old_colname')] <- 'new_colname'

어디

which(colnames(df) == 'old_colname')

특정 열의 인덱스로 반환합니다.

단일 열의 이름을 바꾸는 가장 편리한 방법은 다음을 사용하는 것입니다 dplyr::rename_at.

library(dplyr)
cars %>% rename_at("speed",~"new") %>% head     
cars %>% rename_at(vars(speed),~"new") %>% head
cars %>% rename_at(1,~"new") %>% head

#   new dist
# 1   4    2
# 2   4   10
# 3   7    4
# 4   7   22
# 5   8   16
# 6   9   10

• 파이프 체인에서 잘 작동
• 이름이 변수에 저장 될 때 편리
• 이름 또는 열 인덱스와 함께 작동
• 깨끗하고 컴팩트

패키지 rename.vars에서 사용할 수 있습니다 gdata.

library(gdata)
df <- rename.vars(df, from = "oldname", to = "newname")

이것은 변경할 변수 이름이 두 개 이상이거나 변수 이름에 텍스트를 추가하거나 미리 추가하려는 경우 특히 유용합니다.

df <- rename.vars(df, from = c("old1", "old2", "old3", 
         to = c("new1", "new2", "new3"))

변수 이름의 서브 세트에 텍스트를 추가하는 예는 다음을 참조하십시오. https://stackoverflow.com/a/28870000/180892

시험:

colnames(x)[2] <- 'newname2'

이것은 이미 거기에있을 가능성이 있지만 솔루션을 검색하는 동안 필드 이름 바꾸기로 놀고 있었고 기발한 시도를했습니다. 내 목적을 위해 일했다.

Table1$FieldNewName <- Table1$FieldOldName
Table1$FieldOldName <- NULL

편집은 여기서 시작합니다.

이것은 잘 작동합니다.

df <- rename(df, c("oldColName" = "newColName"))

데이터 프레임에 열이 하나만 있다는 것을 알고 있다면 다음을 사용할 수 있습니다. names(trSamp) <- "newname2"

'Hmisc'패키지에서 'upData'를 시도 할 수도 있습니다.

library(Hmisc)

trSamp = upData(trSamp, rename=c(sample.trainer.index..10000. = 'newname2'))

OP의 질문은 훌륭하고 진정으로 답변되었습니다. 그러나 다음과 같은 상황에서 유용한 트릭이 있습니다. 데이터 프레임에서의 위치에 관계없이 열 이름의 부분 일치 :

이름의 부분 일치 :

d <- data.frame(name1 = NA, Reported.Cases..WHO..2011. = NA, name3 = NA)
##   name1 Reported.Cases..WHO..2011. name3
## 1    NA                         NA    NA
names(d)[grepl("Reported", names(d))] <- "name2"
##   name1 name2 name3
## 1    NA    NA    NA

또 다른 예 : "punctuation"이있을 경우 부분 일치 :

d <- data.frame(name1 = NA, Reported.Cases..WHO..2011. = NA, name3 = NA)
##   name1 Reported.Cases..WHO..2011. name3
## 1    NA                         NA    NA
names(d)[grepl("[[:punct:]]", names(d))] <- "name2"
##   name1 name2 name3
## 1    NA    NA    NA

이것들은 내가 오늘 다루어야 할 예였으며, 나눌 가치가 있다고 생각했습니다.

나는 colnames()더 쉬운 논쟁을 발견했다 https://www.rdocumentation.org/packages/base/versions/3.6.2/topics/row%2Bcolnames

데이터 프레임에서 일부 열을 선택하십시오.

df <- data.frame(df[, c( "hhid","b1005", "b1012_imp", "b3004a")])

선택한 열의 이름을 순서대로 바꾸고

colnames(df) <- c("hhid", "income", "cost", "credit")

이름과 값을 확인하십시오

names(df);head(df)

rename_with함수를 사용 하여 열의 이름을 바꾸는 데 사용할 수 있습니다 ( stringr예 : 함수).

다음 데이터를 고려하십시오 df_1.

df_1 <- data.frame(
  x = replicate(n = 3, expr = rnorm(n = 3, mean = 10, sd = 1)), 
  y = sample(x = 1:2, size = 10, replace = TRUE)
)

names(df_1)

#[1] "x.1" "x.2" "x.3" "y" 

다음 과 같이 모든 변수의 이름을 바꾸십시오 dplyr::everything().

library(tidyverse)

df_1 %>% 
  rename_with(.data = ., .cols = everything(.), 
              .fn = str_replace, pattern = '.*', 
              replacement = str_c('var', seq_along(.), sep = '_')) %>% 
  names()

#[1] "var_1" "var_2" "var_3" "var_4"

로 이름 바꾸기 이름 입자 일부와 dplyr동사 ( starts_with, ends_with, contains, matches, ...).

.( x변수)를 사용한 예 :

df_1 %>% 
  rename_with(.data = ., .cols = contains('.'), 
              .fn = str_replace, pattern = '.*', 
              replacement = str_c('var', seq_along(.), sep = '_')) %>% 
  names()

#[1] "var_1" "var_2" "var_3" "y"

로 이름 바꾸기 클래스 클래스 테스트의 많은 기능과 같은 is.integer, is.numeric, is.factor...

is.integer( y)를 사용한 예 :

df_1 %>% 
  rename_with(.data = ., .cols = is.integer, 
              .fn = str_replace, pattern = '.*', 
              replacement = str_c('var', seq_along(.), sep = '_')) %>% 
  names()

#[1] "x.1"   "x.2"   "x.3"   "var_1"

경고 :

경고 메시지 : 1 : stri_replace_first_regex (string, pattern, fix_replacement (replacement))에서 : 더 긴 오브젝트 길이는 더 짧은 오브젝트 길이의 배수가 아닙니다. 2 : names [cols] <-.fn (names [cols], ...) : 교체 할 품목 수가 교체 길이의 배수가 아님

seq_along(.)바꾸기 기능과 일치하지 않기 때문에 관련이 없습니다 .

원하는 이름으로 데이터 프레임에 새 열을 추가하고 기존 열에서 데이터를 가져옵니다. 이처럼 :

dataf$value=dataf$Article1Order

그런 다음 이전 열을 제거합니다! 이처럼 :

dataf$Article1Order<-NULL

이 코드는 바보처럼 보일 수 있습니다! 그러나 그것은 완벽하게 작동합니다 ...

다음 코드를 사용하여 열 이름을 원하는 새 이름으로 데이터 세트로 변경합니다. names (dataset) [index_value] <- "new_col_name"

library(dplyr)
rename(data, de=de.y)