The modeest包提供了许多单峰单变量数据模式的估计器。
这个有一个功能mfv
返回最频繁的值,或者(如?mfv
状态)最好使用 `mlv(..., method = 'discrete')
library(modeest)
## assuming your data is in the data.frame dd
apply(dd[,2:6], 1,mfv)
[1] 5 7 4 2
## or
apply(dd[,2:6], 1,mlv, method = 'discrete')
[[1]]
Mode (most frequent value): 5
Bickel's modal skewness: -0.2
Call: mlv.integer(x = newX[, i], method = "discrete")
[[2]]
Mode (most frequent value): 7
Bickel's modal skewness: -0.4
Call: mlv.integer(x = newX[, i], method = "discrete")
[[3]]
Mode (most frequent value): 4
Bickel's modal skewness: -0.4
Call: mlv.integer(x = newX[, i], method = "discrete")
[[4]]
Mode (most frequent value): 2
Bickel's modal skewness: 0.4
Call: mlv.integer(x = newX[, i], method = "discrete")
现在,如果您有最频繁的联系,那么您需要考虑您想要什么。
both mfv
and mlv.integer
将返回与最频繁出现的所有值。 (虽然打印方法只显示单个值)