Jak naprawić: błąd w colmeans(x, na.rm = true): „x” musi być liczbą

Komunikat o błędzie, który możesz napotkać podczas korzystania z R, to:

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

Ten błąd zwykle występuje, gdy próbujesz użyć funkcji prcomp() do przeprowadzenia analizy głównych składowych w R , gdy jedna lub więcej kolumn w używanej ramce danych nie jest liczbowych.

Istnieją dwa sposoby obejścia tego błędu:

Metoda 1: Konwertuj kolumny inne niż liczbowe na kolumny numeryczne

Metoda 2: Usuń kolumny nienumeryczne z ramki danych

Poniższe przykłady pokazują, jak zastosować każdą metodę w praktyce.

Jak odtworzyć błąd

Załóżmy, że próbujemy przeprowadzić analizę głównych składowych na następującej ramce danych zawierającej kolumnę znaków:

 #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

Kolumna zespołu jest kolumną znakową, co powoduje błąd podczas próby użycia funkcji prcomp() .

Metoda 1: Konwertuj kolumny inne niż liczbowe na kolumny numeryczne

Jednym ze sposobów uniknięcia tego błędu jest konwersja kolumny zespołu na kolumnę numeryczną przed użyciem funkcji 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

Tym razem nie otrzymaliśmy żadnych błędów, ponieważ każda kolumna w ramce danych jest liczbowa.

Metoda 2: Usuń kolumny nienumeryczne z ramki danych

Innym sposobem uniknięcia błędu jest po prostu usunięcie wszystkich kolumn nienumerycznych z ramki danych przed użyciem funkcji 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

Ponownie nie otrzymujemy żadnych błędów, ponieważ każda kolumna w ramce danych jest liczbowa.

Uwaga : w większości przypadków preferowanym rozwiązaniem jest pierwsza metoda, ponieważ wykorzystuje wszystkie dane, a nie usuwa niektóre kolumny.

Dodatkowe zasoby

Poniższe samouczki wyjaśniają, jak naprawić inne typowe błędy w R:

Jak naprawić w R: argumenty obejmują różną liczbę linii
Jak naprawić w R: błąd w wyborze nieużywanych argumentów
Jak naprawić w R: wymiana ma zerową długość