Dodawanie nowej kolumny do błędu macierzy

Question

Próbuję dodać nową kolumnę do istniejącej macierzy, ale otrzymuję ostrzeżenie za każdym razem.

Próbuję ten kod:

normDisMatrix$newColumn <- labels 

ten komunikat:

wiadomość Uwaga: W normDisMatrix $ newColumn < - Etykiety: Zmuszanie LHS do listy

Po tym, gdy sprawdzam matrycę, wydaje się zerowa:

dim(normDisMatrix) 
NULL 

Uwaga: etykiety są tylko wektory, które mają numery między 1 i 4.

Co może być problemem?

Answer 1

Jak zauważyła @mailloga, operator $ nie może być używany do podzbioru macierzy. Dzieje się tak dlatego, że macierz jest tylko pojedynczym wektorem z atrybutem wymiaru. Kiedy użyłeś $, aby spróbować dodać nową kolumnę, R przekształcił twoją macierz na najniższą strukturę, gdzie $ może być użyty w wektorze, który jest listą.

Funkcja chcesz to cbind() (c olumn wiążą). Załóżmy, że mam matrycę m

(m <- matrix(51:70, 4)) 
#  [,1] [,2] [,3] [,4] [,5] 
# [1,] 51 55 59 63 67 
# [2,] 52 56 60 64 68 
# [3,] 53 57 61 65 69 
# [4,] 54 58 62 66 70 

Aby dodać nową kolumnę z wektora zwanego labels możemy zrobić

labels <- 1:4 
cbind(m, newColumn = labels) 
#      newColumn 
# [1,] 51 55 59 63 67   1 
# [2,] 52 56 60 64 68   2 
# [3,] 53 57 61 65 69   3 
# [4,] 54 58 62 66 70   4