R语言程序：找出统计众数

示例：在R中查找统计众数

# 创建一个成绩向量marks1
marks1 <- c(56, 88, 75, 87, 73, 69, 47, 59, 61, 92)

# 定义mode()函数
mode = function() {

  # 计算marks1的众数
  return(names(sort(-table(marks1)))[1])
}

# 调用mode()函数
mode()

输出

[1] "47"

在上面的示例中，我们创建了一个名为mode()的函数，用于计算marks1向量的众数。

在函数内部，我们使用table()函数创建了一个数据的分类表示，包括变量名称和表格形式的频率。

我们将marks1按降序排列，并返回排序后的值中的第1个值。

最后，我们调用了mode()函数，它返回了marks1中最常见的数字，即47。