保留多个chisq.test值的汇总tibble
创始人
2024-11-24 10:30:06
0

要保留多个chisq.test值的汇总tibble,可以使用tidyverse中的dplyr和broom包。下面是一个包含代码示例的解决方法:

  1. 首先,安装和加载所需的包:
install.packages("tidyverse")
install.packages("broom")

library(tidyverse)
library(broom)
  1. 创建一个包含多个数据帧的列表,每个数据帧包含要进行chisq.test的数据:
data_list <- list(
  data_frame1 = data_frame(x = c(1, 2, 3), y = c(4, 5, 6)),
  data_frame2 = data_frame(x = c(7, 8, 9), y = c(10, 11, 12))
)
  1. 使用purrr::map函数对数据列表中的每个数据帧应用chisq.test,并使用broom::tidy函数将结果转换为tibble:
result <- map(data_list, ~ chisq.test(.x$x, .x$y) %>%
  tidy() %>%
  select(estimate, p.value))

result_tibble <- bind_rows(result, .id = "data_frame")

在这个示例中,chisq.test对每个数据帧的x和y列进行了卡方检验,然后使用tidy函数将结果转换为tibble。最后,使用bind_rows函数将所有结果合并为一个汇总tibble,并使用.id参数将数据帧名称添加为一个列。

  1. 打印结果:
print(result_tibble)

这将打印出包含每个chisq.test值的汇总tibble,其中包括估计值和p值。

请注意,此解决方案假设每个数据帧具有相同的变量名称。如果变量名称不同,可能需要对代码进行适当的修改。

相关内容

热门资讯

记者揭秘!智星菠萝辅助(透视辅... 记者揭秘!智星菠萝辅助(透视辅助)拱趴大菠萝辅助神器,扑克教程(有挂细节);模式供您选择,了解更新找...
一分钟揭秘!约局吧能能开挂(透... 一分钟揭秘!约局吧能能开挂(透视辅助)hhpoker辅助靠谱,2024新版教程(有挂教学);约局吧能...
透视辅助!wepoker模拟器... 透视辅助!wepoker模拟器哪个好用(脚本)hhpoker辅助挂是真的,科技教程(有挂技巧);囊括...
透视代打!hhpkoer辅助器... 透视代打!hhpkoer辅助器视频(辅助挂)pokemmo脚本辅助,2024新版教程(有挂教程);风...
透视了解!约局吧德州真的有透视... 透视了解!约局吧德州真的有透视挂(透视脚本)德州局HHpoker透视脚本,必胜教程(有挂分析);亲,...
六分钟了解!wepoker挂底... 六分钟了解!wepoker挂底牌(透视)德普之星开辅助,详细教程(有挂解密);德普之星开辅助是一种具...
9分钟了解!wpk私人辅助(透... 9分钟了解!wpk私人辅助(透视)hhpoker德州透视,插件教程(有挂教学);风靡全球的特色经典游...
推荐一款!wepoker究竟有... 推荐一款!wepoker究竟有透视(脚本)哈糖大菠萝开挂,介绍教程(有挂技术);囊括全国各种wepo...
每日必备!wepoker有人用... 每日必备!wepoker有人用过(脚本)wpk有那种辅助,线上教程(有挂规律);wepoker有人用...
玩家必备教程!wejoker私... 玩家必备教程!wejoker私人辅助软件(脚本)哈糖大菠萝可以开挂,可靠技巧(有挂神器)申哈糖大菠萝...