猛跑小猪
table()的输出可以看成是一个带名字的数字向量。可以用names()和as.numeric()分别得到名称和频数:> x <- sample(c("a", "b", "c"), 100, replace=TRUE)> names(table(x))[1] "a" "b" "c"> as.numeric(table(x))[1] 42 25 33或者,可以直接把输出结果转化为数据框,as.data.frame():> as.data.frame(table(x))x Freq1 a 422 b 253 c 33