Не работает, потому что оператор "$" не оценивает свой аргумент.Вам нужно использовать «[» или «[[» ».(Не рекомендуется называть вашу таблицу «таблицей». Это сбивает с толку пользователей, использующих функцию table
.)
table <- structure(c(0, 1, 1, 1, 0, 0, 0, 0, 0), .Dim = c(3L, 3L), .Dimnames = list(
c("X1", "X2", "X3"), c("a", "b", "c")), class = "table")
table[ , col.name]
# X1 X2 X3
# 0 1 1
table[ , "a"]
# X1 X2 X3
# 0 1 1
table
table[["a"]]
Error in table[["a"]] : subscript out of bounds