首頁猿問是否有一個內(nèi)置的功能來查找模式？

是否有一個內(nèi)置的功能來查找模式？

R語言

猛跑小豬 2019-06-12 21:21:21

是否有一個內(nèi)置的功能來查找模式？在R，mean()和median()都是標準的函數(shù)，可以做你期望的事情。mode()告訴您對象的內(nèi)部存儲模式，而不是其參數(shù)中發(fā)生最多的值。但是，是否有一個標準庫函數(shù)來實現(xiàn)向量(或列表)的統(tǒng)計模式？

查看完整描述

3 回答

智慧大石

TA貢獻1946條經(jīng)驗獲得超3個贊

還有一個解決方案，它既適用于數(shù)字數(shù)據(jù)，也適用于字符/因素數(shù)據(jù)：

Mode <- function(x) {
  ux <- unique(x)
  ux[which.max(tabulate(match(x, ux)))]}

在我的小機器上，它可以在大約半秒鐘內(nèi)生成和找到10m整數(shù)向量的模式。

如果您的數(shù)據(jù)集可能有多種模式，則上述解決方案采用的方法與which.max，并返回先出現(xiàn)模式集的值。返回全模式，使用此變體(注釋中的@digEmAll)：

Modes <- function(x) {
  ux <- unique(x)
  tab <- tabulate(match(x, ux))
  ux[tab == max(tab)]}

反對回復(fù) 2019-06-12

泛舟湖上清波郎朗

TA貢獻1818條經(jīng)驗獲得超3個贊

有包裹modeest它提供了單變量單峰(有時是多模)數(shù)據(jù)模式的估計和通常概率分布模式的值。

mySamples <- c(19, 4, 5, 7, 29, 19, 29, 13, 25, 19)library(modeest)mlv(mySamples, method = "mfv")Mode (most likely value):
 19 Bickel's modal skewness: -0.1 
Call: mlv.default(x = mySamples, method = "mfv")

有關(guān)更多信息，請參見本頁

反對回復(fù) 2019-06-12