如何统计R语言生成的骰子点数各数值的出现次数

下面是几种在R里统计1-6点数出现次数的常用方法，直接用你已有的data_rolls数据框就能实现：

方法1：用基础R的table()函数 #

这是最直接的方式，不需要额外安装包：

# 生成频数表
freq_table <- table(data_rolls$data_rolls)
print(freq_table)

# 如果想转成更规整的data.frame格式
freq_df <- as.data.frame(freq_table)
colnames(freq_df) <- c("点数", "出现次数") # 自定义列名
print(freq_df)

方法2：用dplyr包的count()函数 #

如果你习惯用tidyverse工具链，先安装并加载dplyr：

# 安装（第一次用需要执行）
install.packages("dplyr")
library(dplyr)

# 统计次数并自定义列名
freq_dplyr <- data_rolls %>% 
  count(data_rolls, name = "出现次数") %>% 
  rename(点数 = data_rolls)
print(freq_dplyr)

方法3：用xtabs()函数 #

基础R里的交叉表函数，也能快速生成频数统计：

freq_xtabs <- xtabs(~ data_rolls, data = data_rolls)
print(freq_xtabs)

# 转成data.frame
freq_xtabs_df <- as.data.frame(freq_xtabs)
colnames(freq_xtabs_df) <- c("点数", "出现次数")
print(freq_xtabs_df)

内容的提问来源于stack exchange，提问作者Teni Taiwo