извлечь из списка и применить функцию над результирующими таблицами в R

Question

Я загружаю некоторые данные и получаю вывод в виде списка, как показано ниже

              [,1]       [,2]       [,3]       [,4]       [,5]           
 call         Expression Expression Expression Expression Expression 
 data.summary Numeric,27 Numeric,27 Numeric,27 Numeric,27 Numeric,27 
 corr.table   List,3     List,3     List,3     List,3     List,3    
 profile.test List,3     List,3     List,3     List,3     List,3 

Я хочу извлечь информацию в части списка data.summary , которая должна Посмотрите что-то вроде двух таблиц ниже, где каждая таблица является выводом из другого загрузочного сэмпла.

              Group1      Group2      Group3
Variable1   -0.24318341   0.2438441   1.4045265
Variable2   -0.59632657   0.8538364   0.7574677
Variable3   -0.47474506   0.3928146   3.6156861
Variable4   -0.45918093   0.3757191   3.5414283
Variable5    0.22030575  -0.3028505  -0.4120158
Variable6   -0.43195698   0.3774980   3.0789076
Variable7    0.02884509  -0.0212604  -0.2470542
Variable8   -0.41558541   0.3564719   3.0327549
Variable9   -0.47583635   0.3943922   3.6169138

              Group1      Group2      Group3
Variable1   -0.24318341   0.2438441   1.4045265
Variable2   -0.59632657   0.8538364   0.7574677
Variable3   -0.47474506   0.3928146   3.6156861
Variable4   -0.45918093   0.3757191   3.5414283
Variable5    0.22030575  -0.3028505  -0.4120158
Variable6   -0.43195698   0.3774980   3.0789076
Variable7    0.02884509  -0.0212604  -0.2470542
Variable8   -0.41558541   0.3564719   3.0327549
Variable9   -0.47583635   0.3943922   3.6169138

Моя конечная цель - получить среднее значение по загрузочным сэмплам в одну таблицу, как показано ниже.

              Group1      Group2      Group3
Variable1   -0.24318341   0.2438441   1.4045265
Variable2   -0.59632657   0.8538364   0.7574677
Variable3   -0.47474506   0.3928146   3.6156861
Variable4   -0.45918093   0.3757191   3.5414283
Variable5    0.22030575  -0.3028505  -0.4120158
Variable6   -0.43195698   0.3774980   3.0789076
Variable7    0.02884509  -0.0212604  -0.2470542
Variable8   -0.41558541   0.3564719   3.0327549
Variable9   -0.47583635   0.3943922   3.6169138

Answer 1

В базе R вы можете использовать Reduce, деленное на длину:

 Reduce('+', output[2, ]) / 5 

Некоторые данные, которые можно воспроизвести. Представьте, что coefficients в таблице ниже соответствует data.summary выше

 output <- replicate(5,summary(lm(y~.,data.frame(y=rnorm(150),iris))))[-c(2:3,5:9),]