我对R相当陌生,正在try 构建一个数据框,其中包含嵌套列表中每个元素的每个唯一观测的频率:
lst <- list(
c('A', 'A', 'A'),
c("A", "B"),
c("A", "A", "B", "B", "B", "B"),
c("A", "C", "C"),
c("B", "A")
)
我可以不考虑列表中的元素或仅针对其中一个元素来计算如何做到这一点:
prop <- prop.table(table(unlist(lapply(lst, unique))))
as.data.frame(prop)
# or
as.data.frame(prop.table(table(lst[[1]]))
但没有说明如何有效地将两者结合起来.
我想要的输出是这样的:
type 1 2 3 4 5
======================
A 1 .5 .33 .33 .5
B 0 .5 .67 0 .5
C 0 0 0 .67 0
此外,我希望输出的位数比仅使用pro.table()时的位数多.如有任何建议,不胜感激