Converta o formato da coluna data.frame de caractere para fator

Gostaria de alterar o formato (classe) de algumas colunas do meu objeto data.frame ( mydf) de charactor para fator .

Não quero fazer isso quando estou lendo o arquivo de texto read.table() função.

Qualquer ajuda seria apreciada.

Olá, seja bem-vindo ao mundo da 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

Isso também funciona para caracteres, datas, números inteiros e outras classes

Como você é novo no R, sugiro que você dê uma olhada nesses dois sites:

Manuais de referência R: http://cran.r-project.org/manuals.html

R Cartão de referência: 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)

Explicação. Todos os quadros de dados são listas e os resultados [usados ​​com vários argumentos com valor também são listas; portanto, fazer o loop sobre as listas é a tarefa lapply. A atribuição acima criará um conjunto de listas nas quais a função data.frame.[<-deve voltar com êxito ao quadro de dados,df

Outra estratégia seria converter apenas as colunas em que o número de itens exclusivos é menor que algum critério, digamos menos que o log do número de linhas como exemplo:

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

Você pode usar dplyr::mutate_if()para converter todas as colunas de caracteres ou dplyr::mutate_at()selecionar colunas de caracteres nomeadas em fatores:

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 você deseja alterar todas as variáveis ​​de caractere no data.frame para fatores depois de já ter carregado os dados, é possível fazer assim, para um data.frame chamado dat:

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

Isso cria um vetor que identifica quais colunas são de classe charactere depois se aplica as.factora essas colunas.

Dados de amostra:

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

Outra maneira curta que você pode usar é um pipe ( %<>%) do pacote magrittr . Ele converte a coluna de caracteres mycolumn em um fator.

library(magrittr)

mydf$mycolumn %<>% factor

Eu estou fazendo isso com uma função. Neste caso, vou transformar apenas variáveis ​​de caracteres em fator:

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