在 R 中使用 DescTools 的模式

Question

我正在使用 R，我已经学会了使用 CodeAcademy 的课程来计算众数。基本上 CodeAcademy 推荐使用 DescTools（这是我在我的电脑上安装的 R 包）。 Mode 应该 return 数值向量中最常出现的值。然而，当我运行这个简单的代码块时，我在 R 中的控制台没有 returning 任何东西。只是转载了我执行过的那行代码。

是我的IDE有问题还是我写这段代码有误？我已经阅读了很多线程并使用了 ?Mode 帮助功能，但似乎我已经正确地编写了代码，据我所知。执行代码时，我的控制台中没有显示任何结果。

install.packages("DescTools")
require(DescTools)
?Mode
my_data <- c(15,8,9,15,12,13,2,15,13,8,13,6,7)
Mode2 <- Mode(my_data)
print(Mode2)
Mode2
view(Mode2)

正如您在上面的代码块中看到的，我尝试使用 print() 查看数据，我尝试只键入 Mode2 以将其呈现到工作簿，我尝试使用 view()，但是 none 这些行会在我的控制台中产生任何输出。

Answer 1

如果我们想要获得 Mode，另一种选择是使用 base R 选项创建一个

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

-测试

> Mode(my_data)
[1] 15

在 R 中使用 DescTools 的模式

Mode using DescTools in R

r

desctools