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

1. 首先，安装和加载所需的包：

install.packages("tidyverse")
install.packages("broom")

library(tidyverse)
library(broom)

2. 创建一个包含多个数据帧的列表，每个数据帧包含要进行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))
)

3. 使用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参数将数据帧名称添加为一个列。

4. 打印结果：

print(result_tibble)

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

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