Como corrigir: erro em colmeans(x, na.rm = true): 'x' deve ser numérico

Uma mensagem de erro que você pode encontrar ao usar R é:

 Error in colMeans(x, na.rm = TRUE): 'x' must be numeric

Este erro normalmente ocorre quando você tenta usar a função prcomp() para realizar a análise de componentes principais em R , quando uma ou mais colunas no quadro de dados que você está usando não são numéricas.

Existem duas maneiras de contornar esse erro:

Método 1: converter colunas não numéricas em colunas numéricas

Método 2: remover colunas não numéricas do quadro de dados

Os exemplos a seguir mostram como usar cada método na prática.

Como reproduzir o erro

Suponha que estejamos tentando realizar uma análise de componentes principais no seguinte quadro de dados que contém uma coluna de caracteres:

 #create data frame
df <- data. frame (team=c('A', 'A', 'C', 'B', 'C', 'B', 'B', 'C', 'A'),
                 points=c(12, 8, 26, 25, 38, 30, 24, 24, 15),
                 rebounds=c(10, 4, 5, 5, 4, 3, 8, 18, 22))

#view data frame
df

  team points rebounds
1 to 12 10
2 to 8 4
3 C 26 5
4 B 25 5
5 C 38 4
6 B 30 3
7 B 24 8
8 C 24 18
9 to 15 22

#attempt to calculate principal components
prcomp(df)

Error in colMeans(x, na.rm = TRUE): 'x' must be numeric

A coluna equipe é uma coluna de caracteres, o que causa um erro ao tentar usar a função prcomp() .

Método 1: converter colunas não numéricas em colunas numéricas

Uma maneira de evitar esse erro é converter a coluna da equipe em uma coluna numérica antes de usar a função prcomp() :

 #convert character column to numeric
df$team <- as. numeric (as. factor (df$team))

#view updated data frame
df

  team points rebounds
1 1 12 10
2 1 8 4
3 3 26 5
4 2 25 5
5 3 38 4
6 2 30 3
7 2 24 8
8 3 24 18
9 1 15 22

#calculate main components
prcomp(df)

Standard deviations (1, .., p=3):
[1] 9.8252704 6.0990235 0.4880538

Rotation (nxk) = (3 x 3):
                 PC1 PC2 PC3
team -0.06810285 0.04199272 0.99679417
points -0.91850806 0.38741460 -0.07907512
rebounds 0.38949319 0.92094872 -0.01218661

Desta vez não recebemos nenhum erro porque cada coluna do quadro de dados é numérica.

Método 2: remover colunas não numéricas do quadro de dados

Outra maneira de evitar o erro é simplesmente remover todas as colunas não numéricas do quadro de dados antes de usar a função prcomp() :

 #remove non-numeric columns from data frame
df_new <- df[ , unlist(lapply(df, is. numeric ))]

#view new data frame
df_new

  rebound points
1 12 10
2 8 4
3 26 5
4 25 5
5 38 4
6 30 3
7 24 8
8 24 18
9 15 22

#calculate main components
prcomp(df_new)

Standard deviations (1, .., p=2):
[1] 9.802541 6.093638

Rotation (nxk) = (2 x 2):
                PC1 PC2
points 0.9199431 0.3920519
rebounds -0.3920519 0.9199431

Novamente, não recebemos nenhum erro porque cada coluna do quadro de dados é numérica.

Nota : Na maioria dos casos, o primeiro método é a solução preferida porque utiliza todos os dados em vez de remover determinadas colunas.

Recursos adicionais

Os tutoriais a seguir explicam como corrigir outros erros comuns no R:

Como consertar em R: argumentos envolvem diferentes números de linhas
Como corrigir em R: erro na seleção de argumentos não utilizados
Como reparar em R: a substituição tem comprimento zero