R中没有直接求众数的函数
q1 <- c(3,7,5,4,5,6,7,8,6,5)
> table(q1)
q1
3 4 5 6 7 8
1 1 3 2 2 1
> max(table(q1))
[1] 3
> table(q1) == max(table(q1))
q1
3 4 5 6 7 8
FALSE FALSE TRUE FALSE FALSE FALSE
> names(table(q1))
[1] "3" "4" "5" "6" "7" "8"
> as.numeric(names(table(q1)))
[1] 3 4 5 6 7 8
> as.numeric(names(table(q1)))[table(q1) == max(table(q1))]
[1] 5
最后
以上就是雪白黄豆最近收集整理的关于R中如何求众数的全部内容，更多相关R中如何求众数内容请搜索靠谱客的其他文章。
本图文内容来源于网友提供，作为学习参考使用，或来自网络收集整理，版权属于原作者所有。
发表评论 取消回复