Skip to main content
1 de 2
Carlos Cinelli
  • 17,2mil
  • 16
  • 63
  • 102

Isso, você vai usar o sapply com a função is.numeric. Em resumo, o sapply vai aplicar a cada variável (coluna) do seu data.frame a função is.numeric para saber se aquela é uma variável (coluna) numérica.

Gerando uma base para demonstração:

df <- data.frame(numeric1 = 1:10,
                 factor = factor(c("a", "b")),
                 character = "texto",
                 numeric2 = 10:1,
                 logical = TRUE)
str(df)
'data.frame':   10 obs. of  5 variables:
 $ numeric1  : int  1 2 3 4 5 6 7 8 9 10
 $ factor    : Factor w/ 2 levels "a","b": 1 2 1 2 1 2 1 2 1 2
 $ character : Factor w/ 1 level "texto": 1 1 1 1 1 1 1 1 1 1
 $ numeric2  : int  10 9 8 7 6 5 4 3 2 1
 $ logical   : logi  TRUE TRUE TRUE TRUE TRUE TRUE ...

Usando o sapply com is.numeric para gerar um vetor indicando quais colunas são numéricas:

numericas <- sapply(df, is.numeric)
numericas
numeric1    factor character  numeric2   logical 
     TRUE     FALSE     FALSE      TRUE     FALSE

Agora você pode usar esse vetor para filtrar o data.frame:

df[,numericas]
  numeric1 numeric2
1         1       10
2         2        9
3         3        8
4         4        7
5         5        6
6         6        5
7         7        4
8         8        3
9         9        2
10       10        1
Carlos Cinelli
  • 17,2mil
  • 16
  • 63
  • 102