R语言求众数与其个数

R语言

1.求众数元素的个数

max(table(x))

 

2.求众数

as.numeric(names(table(x))[table(x)==max(table(x))]

 

(1) table(x): table函数在R中用于创建一个频率表，即统计向量x中每个元素出现的次数。结果是一个向量，其长度与x中元素的唯一值数量相同，向量中的每个元素代表相应唯一值在x中出现的次数。

(2) names(table(x)): names函数用于获取table(x)结果的名称，这些名称实际上是x中的唯一元素。例如，如果x是一个包含字符或因子的向量，names(table(x))将返回这些唯一元素的向量。

(3) as.numeric(names(table(x))): 由于names(table(x))返回的是字符型向量，这里使用as.numeric函数将其转换为数值型向量。这样做是为了能够在后续的索引操作中使用这些名称。

(4) table(x) == max(table(x)): 这部分代码是一个逻辑表达式，用于找出table(x)中最大值的位置。max(table(x))返回x中出现次数最多的元素的频率，table(x) == max(table(x))将比较table(x)中的每个元素是否等于这个最大值。结果是长度与x中元素数量相同的逻辑向量，其中最大值的位置为TRUE，其余位置为FALSE。

(5) as.numeric(names(table(x)))[table(x) == max(table(x))]: 最后，这个表达式使用逻辑索引从as.numeric(names(table(x)))创建的数值型向量中提取出现次数最多的元素的名称。由于table(x)中的元素是按照x中元素的顺序排列的，这个索引操作实际上是找出并返回出现次数最多的元素的原始值。