Birden çok listeden vektörlerin ortalaması nasıl hesaplanır?

Question

Vektörler içeren birkaç listeye sahibim ve tek bir liste almak istiyorum; bu elemanlar, ilk listelerin vektörlerinin ortalama vektörleridir.

Örnek: iki başlangıç ​​listeleri

lt1 <- list(a = c(1,2,3), b = c(2,5,10)) 
lt2 <- list(a = c(3,4,5), b = c(4,5,2)) 

ve I lapply ile denenmiş ve llply

lt12 <- list(a = c(2,3,4), b = c(3,5,6)) 

elde etmek istiyorum, ama her zaman her liste vektörü ortalamasını elde sonunda .

Answer 1

Map() öğelerini birlikte cbind() birlikte kullanabilir, ardından oluşan listede rowMeans() öğesini çalıştırabilirsiniz.

lapply(Map(cbind, lt1, lt2), rowMeans) 
# $a 
# [1] 2 3 4 
# 
# $b 
# [1] 3 5 6 

Ya lapply(Map(rbind, lt1, lt2), colMeans)