Como renomear uma única coluna em um data.frame?

Sei que tenho um quadro de dados com mais de uma coluna, posso usar

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

renomear as colunas. Como faço isso se for apenas uma coluna? Significa um vetor ou quadro de dados com apenas uma coluna.

Exemplo:

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"

tenta definir o nome da segunda coluna. Seu objeto possui apenas uma coluna; portanto, o comando gera um erro. Isso deve ser suficiente:

colnames(trSamp) <- "newname2"

Esta é uma maneira generalizada em que você não precisa se lembrar da localização exata da variável:

# 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'

Esse código praticamente faz o seguinte:

1. names(df) olha para todos os nomes no df
2. [names(df) == old.var.name] extrai o nome da variável que você deseja verificar
3. <- 'new.var.name' atribui o novo nome da variável.

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

Esta é uma pergunta antiga, mas vale a pena notar que agora você pode usar setnameso data.tablepacote.

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)

Isso também pode ser feito usando o plyrpacote de Hadley e a renamefunção

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

Você pode renomear pelo nome (sem saber a posição) e executar várias renomeações de uma só vez. Após fazer uma mesclagem, por exemplo, você pode acabar com:

  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

Que você pode renomear em uma etapa usando:

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

Eu acho que a melhor maneira de renomear colunas é usando o pacote dplyr assim:

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

Funciona da mesma maneira para renomear uma ou várias colunas em qualquer conjunto de dados.

Eu gosto do próximo estilo para renomear os nomes das colunas do quadro de dados, um por um.

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

Onde

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

retorna pelo índice da coluna específica.

Acho que a maneira mais conveniente de renomear uma única coluna é usando 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

• funciona bem em cadeias de tubos
• conveniente quando nomes são armazenados em variáveis
• trabalha com um nome ou um índice de coluna
• claro e compacto

Você pode usar o rename.varsno gdatapacote.

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

Isso é particularmente útil quando você tem mais de um nome de variável para alterar ou deseja acrescentar ou adicionar um texto aos nomes das variáveis, e pode fazer algo como:

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

Para obter um exemplo de anexar texto a um subconjunto de nomes de variáveis, consulte: https://stackoverflow.com/a/28870000/180892

Tentar:

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

Provavelmente, isso já existe, mas eu estava brincando com a renomeação de campos enquanto procurava uma solução e tentei por um capricho. Trabalhei para meus propósitos.

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

A edição começa aqui ....

Isso também funciona.

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

Se você sabe que seu quadro de dados possui apenas uma coluna, você pode usar: names(trSamp) <- "newname2"

Você também pode tentar 'upData' no pacote 'Hmisc'.

library(Hmisc)

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

A pergunta do OP foi bem e verdadeiramente respondida. No entanto, aqui está um truque que pode ser útil em algumas situações: correspondência parcial do nome da coluna, independentemente de sua posição em um dataframe:

Correspondência parcial no nome:

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

Outro exemplo: correspondência parcial na presença de "pontuação":

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

Estes foram exemplos com os quais tive que lidar hoje, pensei que valeria a pena compartilhar.

Eu achei o colnames()argumento mais fácil https://www.rdocumentation.org/packages/base/versions/3.6.2/topics/row%2Bcolnames

selecione alguma coluna do quadro de dados

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

e renomeie a coluna selecionada em ordem,

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

verifique os nomes e os valores para ter certeza

names(df);head(df)

Podemos usar rename_withpara renomear colunas com uma função ( stringrfunções, por exemplo).

Considere os seguintes dados 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" 

Renomeie todas as variáveis com 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"

Renomeie por partículas nome com alguns dplyrverbos ( starts_with, ends_with, contains, matches, ...).

Exemplo com .( xvariáveis):

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"

Renomeie pela classe com muitas funções de teste de classe, como is.integer, is.numeric, is.factor...

Exemplo com 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"

O aviso:

Mensagens de aviso: 1: Em stri_replace_first_regex (string, padrão, fix_replacement (substituto),: o comprimento maior do objeto não é um múltiplo do menor tamanho 2: Nos nomes [cols] <- .fn (names [cols], ...) : número de itens a serem substituídos não é um múltiplo de comprimento de substituição

Não é relevante, pois é apenas uma inconsistência seq_along(.)com a função de substituição.

Eu simplesmente adicionaria uma nova coluna ao quadro de dados com o nome que eu quero e obteria os dados da coluna existente. como isso:

dataf$value=dataf$Article1Order

então eu removo a coluna antiga! como isso:

dataf$Article1Order<-NULL

Esse código pode parecer bobo! Mas funciona perfeitamente ...

Eu simplesmente mudaria o nome de uma coluna para o conjunto de dados com o novo nome que desejo com o seguinte código: names (dataset) [index_value] <- "new_col_name"

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