我有一个分组的data.frame
,其中列m
包含2x2矩阵,如本例所示:
library(tidyverse)
d <- data.frame(g=c(1,1,2,2),x1=c(1,1),x2=c(1,1))
d_by <- d %>% group_by(g) %>% nest %>%
mutate(m = map(data,data.matrix))
d_by$m %>% str
如何将列表列m中的矩阵添加到单个矩阵中?
我尝试使用
d_by %>% summarise(sum(m))
但收到错误消息:
Error in sum(m) : invalid 'type' (list) of argument