在r中使用DescTools模式



我正在使用R,我已经学会了使用CodeAcademy的课程来计算模式。基本上,CodeAcademy推荐使用DescTools(这是我在电脑上安装的一个R包)。Mode应该返回数值向量中最常出现的值。然而,当我运行这个简单的代码块时,我的R控制台没有返回任何东西。它只是重新打印我执行过的那行代码。

是我的IDE有问题,还是我在写这段代码时犯了错误?我已经读了这么多的线程和使用?模式帮助函数,但似乎我已经写的代码从我能告诉正确。当执行代码时,我只是没有得到任何结果显示在我的控制台中。

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()来查看数据,我尝试键入model2将其呈现到工作簿,并且我尝试使用view(),但这些行都没有在我的控制台中产生任何输出。

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

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

测试

> Mode(my_data)
[1] 15

相关内容

  • 没有找到相关文章

最新更新