我只是试图遍历我的列并打印出唯一值的计数以进行进一步处理 - 但是没有输出。这应该很简单,但我没有得到任何输出。这是我的代码的简化版本。我怀疑是否有明显遗漏的东西
for (i in 1:length(mydata)) {
(table(mydata[,i]))
}
答案 0 :(得分:0)
您的意思是使用apply
吗?
> x <- data.frame("SN" = 1:4, "Age" = c(21,15,56,15), "Name" =
c("John","Dora","John","Dora"))
> apply(x,2,function(x) unique(x))
$SN
[1] "1" "2" "3" "4"
$Age
[1] "21" "15" "56"
$Name
[1] "John" "Dora"
您还可以计算这样的唯一身份:
> apply(x,2,function(x) length(unique(x)))
SN Age Name
4 3 2