Come rinominare una singola colonna in un data.frame?

So che se ho un frame di dati con più di 1 colonna, posso usare

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

per rinominare le colonne. Come faccio se è solo una colonna? Significa un vettore o un frame di dati con solo una colonna.

Esempio:

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 di impostare il nome della seconda colonna. Il tuo oggetto ha solo una colonna, quindi il comando genera un errore. Questo dovrebbe essere sufficiente:

colnames(trSamp) <- "newname2"

Questo è un modo generalizzato in cui non è necessario ricordare la posizione esatta della variabile:

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

Questo codice praticamente fa quanto segue:

1. names(df) esamina tutti i nomi in df
2. [names(df) == old.var.name] estrae il nome della variabile che si desidera controllare
3. <- 'new.var.name' assegna il nuovo nome di variabile.

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

Questa è una vecchia domanda, ma vale la pena notare che ora è possibile utilizzare setnamesdal data.tablepacchetto.

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)

Questo può essere fatto anche usando il plyrpacchetto Hadley e la renamefunzione.

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

Puoi rinominare il nome (senza conoscere la posizione) ed eseguire più rinominazioni contemporaneamente. Dopo aver fatto un'unione, ad esempio, potresti finire con:

  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

Che puoi quindi rinominare in un solo passaggio 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

Penso che il modo migliore per rinominare le colonne sia usando il pacchetto dplyr in questo modo:

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

Funziona allo stesso modo per rinominare una o più colonne in qualsiasi set di dati.

Mi piace lo stile successivo per rinominare i nomi delle colonne dei frame di dati uno per uno.

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

dove

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

ritorna dall'indice della colonna specifica.

Trovo che il modo più conveniente per rinominare una singola colonna sia usare 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

• funziona bene in catene di tubi
• conveniente quando i nomi sono memorizzati in variabili
• funziona con un nome o un indice di colonna
• chiaro e compatto

È possibile utilizzare il rename.varsnel gdatapacchetto.

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

Ciò è particolarmente utile quando hai più di un nome di variabile da modificare o vuoi aggiungere o pre-pendere del testo ai nomi delle variabili, quindi puoi fare qualcosa del tipo:

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

Per un esempio di aggiunta di testo a un sottoinsieme di nomi di variabili, consultare: https://stackoverflow.com/a/28870000/180892

Provare:

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

Probabilmente questo è già là fuori, ma stavo giocando con la ridenominazione dei campi mentre cercavo una soluzione e ho provato questo per un capriccio. Ha funzionato per i miei scopi.

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

La modifica inizia qui ....

Funziona anche questo.

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

Se sai che il tuo frame di dati ha solo una colonna, puoi usare: names(trSamp) <- "newname2"

Puoi anche provare 'upData' dal pacchetto 'Hmisc'.

library(Hmisc)

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

Alla domanda del PO è stata data una risposta positiva. Tuttavia, ecco un trucco che può essere utile in alcune situazioni: corrispondenza parziale del nome della colonna, indipendentemente dalla sua posizione in un frame di dati:

Corrispondenza parziale sul 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

Un altro esempio: corrispondenza parziale sulla presenza di "punteggiatura":

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

Questi erano esempi che dovevo affrontare oggi, pensavo che valesse la pena condividerli.

Ho trovato colnames()più facile l'argomento https://www.rdocumentation.org/packages/base/versions/3.6.2/topics/row%2Bcolnames

selezionare una colonna dal riquadro dati

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

e rinominare la colonna selezionata in ordine,

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

controlla i nomi e i valori per essere sicuro

names(df);head(df)

Possiamo usare rename_withper rinominare le colonne con una funzione ( stringrfunzioni, ad esempio).

Considera i seguenti dati 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" 

Rinomina tutte le variabili con 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"

Rinomina dal nome di particelle con alcuni dplyrverbi ( starts_with, ends_with, contains, matches, ...).

Esempio con .( xvariabili):

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"

Rinomina per classe con molte funzioni di prova di classe, come is.integer, is.numeric, is.factor...

Esempio con 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"

L'avviso:

Messaggi di avviso: 1: In stri_replace_first_regex (stringa, modello, fix_replacement (sostituzione),: la lunghezza dell'oggetto più lunga non è un multiplo della lunghezza dell'oggetto più corta 2: In names [cols] <- .fn (names [cols], ...) : il numero di articoli da sostituire non è un multiplo della lunghezza di sostituzione

Non è rilevante, poiché è solo un'incoerenza seq_along(.)rispetto alla funzione di sostituzione.

Vorrei semplicemente aggiungere una nuova colonna al frame di dati con il nome che desidero e ottenere i dati per essa dalla colonna esistente. come questo:

dataf$value=dataf$Article1Order

quindi rimuovo la vecchia colonna! come questo:

dataf$Article1Order<-NULL

Questo codice potrebbe sembrare sciocco! Ma funziona perfettamente ...

Vorrei semplicemente modificare il nome di una colonna nel set di dati con il nuovo nome desiderato con il seguente codice: names (set di dati) [index_value] <- "new_col_name"

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