给定一个包含不同变量的两个重复测量的数据框(即A1, A2, B1, B2
)
library(purrr)
library(tidyr)
library(broom)
set.seed(123)
my_df = data.frame(matrix(rnorm(80), nrow=10))
colnames(my_df) <- c("A1_BEFORE", "A1_AFTER", "A2_BEFORE", "A2_AFTER",
"B1_BEFORE", "B1_AFTER", "B2_BEFORE", "B2_AFTER")
如何使用函数式编程原则来迭代相同变量的对(之前,之后),并获得“整洁”的结果?这是我的尝试:
bef <- select(my_df, contains("BEFORE"))
aft <- select(my_df, contains("AFTER"))
result <- map2(bef, aft, t.test, paired = T)
以上结果产生了多个嵌套列表。我怎样才能获得“整洁”的结果?
result <- tidy(map2(bef, aft, t.test, paired = T))
结果 <- tidy(map2(bef, aft, t.test,paired = T))
tidy.list(map2(bef, aft, t.test,paired = T)) 中的错误:此列表中没有识别整理方法另外:警告消息:在 sort(names(x)) == c("d", "u", "v") 中:较长的对象长度不是较短对象长度的倍数