convertir datos.formato de columna de marco de carácter a factor

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

Explicación. Todos los dataframes son listas y los resultados de [ utilizados con múltiples argumentos de valor son igualmente listas, por lo que el bucle sobre listas es la tarea de lapply. La asignación anterior creará un conjunto de listas en las que la función data.frame.[<- debería insertarse correctamente en el dataframe, df

Otra estrategia sería convertir sólo las columnas donde el número de elementos es menor que algún criterio, digamos menos que el registro del número de filas como un ejemplo:

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

Si desea cambiar todas las variables de caracteres en sus datos.frame to factors después de que ya hayas cargado tus datos, puedes hacerlo así, a un dato.marco llamado dat:

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

Esto crea un vector que identifica qué columnas son de la clase character, luego se aplica as.factor a esas columnas.

Datos de muestra:

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

Otra forma corta que podría usar es una tubería (%<>%) del paquete magrittr. Convierte el carácter column mycolumn a un factor.

library(magrittr)

mydf$mycolumn %<>% factor

Lo he hecho con una función. En este caso solo transformaré variables de caracteres a factor:

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

Puede usar dplyr::mutate_if() para convertir todas las columnas de caracteres o dplyr::mutate_at() para seleccionar columnas de caracteres con nombre a factores:

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)