Converti il ​​formato della colonna data.frame da carattere a fattore

Vorrei cambiare il formato (classe) di alcune colonne del mio oggetto data.frame ( mydf) da charactor al fattore .

Non voglio farlo quando sto leggendo il file di testo per read.table()funzione.

Qualsiasi aiuto sarebbe apprezzato.

Ciao benvenuto nel mondo di R.

mtcars  #look at this built in data set
str(mtcars) #allows you to see the classes of the variables (all numeric)

#one approach it to index with the $ sign and the as.factor function
mtcars$am <- as.factor(mtcars$am)
#another approach
mtcars[, 'cyl'] <- as.factor(mtcars[, 'cyl'])
str(mtcars)  # now look at the classes

Questo funziona anche con caratteri, date, numeri interi e altre classi

Dato che sei nuovo su R, ti suggerisco di dare un'occhiata a questi due siti Web:

Manuali di riferimento R: http://cran.r-project.org/manuals.html

R Scheda di riferimento: http://cran.r-project.org/doc/contrib/Short-refcard.pdf

# To do it for all names
df[] <- lapply( df, factor) # the "[]" keeps the dataframe structure
 col_names <- names(df)
# do do it for some names in a vector named 'col_names'
df[col_names] <- lapply(df[col_names] , factor)

Spiegazione. Tutti i frame di dati sono elenchi e i risultati dell'uso [con più argomenti valutati sono allo stesso modo elenchi, quindi il compito di eseguire il loop su elenchi lapply. L'assegnazione di cui sopra creerà una serie di elenchi in cui la funzione data.frame.[<-dovrebbe reinserirsi correttamente nel frame di dati,df

Un'altra strategia sarebbe quella di convertire solo quelle colonne in cui il numero di elementi univoci è inferiore ad alcuni criteri, ad esempio meno del registro del numero di righe come esempio:

cols.to.factor <- sapply( df, function(col) length(unique(col)) < log10(length(col)) )
df[ cols.to.factor] <- lapply(df[ cols.to.factor] , factor)

È possibile utilizzare dplyr::mutate_if()per convertire tutte le colonne di caratteri o dplyr::mutate_at()per selezionare le colonne di caratteri con nome in fattori:

library(dplyr)

# all character columns to factor:
df <- mutate_if(df, is.character, as.factor)

# select character columns 'char1', 'char2', etc. to factor:
df <- mutate_at(df, vars(char1, char2), as.factor)

Se vuoi cambiare tutte le variabili di carattere nel tuo data.frame in fattori dopo aver già caricato i tuoi dati, puoi farlo in questo modo, in un data.frame chiamato dat:

character_vars <- lapply(dat, class) == "character"
dat[, character_vars] <- lapply(dat[, character_vars], as.factor)

Questo crea un vettore che identifica quali colonne sono di classe character, quindi si applica as.factora quelle colonne.

Dati di esempio:

dat <- data.frame(var1 = c("a", "b"),
                  var2 = c("hi", "low"),
                  var3 = c(0, 0.1),
                  stringsAsFactors = FALSE
                  )

Un altro modo breve che potresti usare è una pipe ( %<>%) dal pacchetto magrittr . Converte la colonna di caratteri mycolumn in un fattore.

library(magrittr)

mydf$mycolumn %<>% factor

L'ho fatto con una funzione. In questo caso trasformerò solo le variabili di carattere in fattore:

for (i in 1:ncol(data)){
    if(is.character(data[,i])){
        data[,i]=factor(data[,i])
    }
}