R, используя табличную функцию в списке

Question

Если я определю список следующим образом:

a <- list(1,2,3,4,5,1)

и затем вызову table(a), я получу:

, , a.3 = 3, a.4 = 4, a.5 = 5, a.6 = 1

   a.2
a.1 2
  1 1

Разве это поведение не странное?Как я мог использовать табличную функцию в этом списке, чтобы получить что-то вроде:

1 2 3 4 5 
2 1 1 1 1 

Answer 1

Функция table обеспечивает "таблицу непредвиденных обстоятельств для каждой комбинации уровней факторов" (от ?table).Так как он работает на векторах , а не на list, вам просто нужно отменить его:

unlist(a)
# [1] 1 2 3 4 5 1
table(unlist(a))
# 1 2 3 4 5 
# 2 1 1 1 1