Aby znaleźć wierszową korelację dwóch macierzy X i Y, wyjście powinno mieć wartość korelacji dla wiersza 1 X i wiersza 1 Y, ..., a więc łącznie dziesięć wartości (ponieważ jest dziesięć wierszy):

X <- matrix(rnorm(2000), nrow=10)
Y <- matrix(rnorm(2000), nrow=10)

sapply(1:10, function(row) cor(X[row,], Y[row,]))

Teraz, jak mamzastosować tę funkcję do dwóch list (zawierających po około 50 ramek danych)?

Rozważmy listę A z ramkami danych $ 1, 2, 3 $ ... i tak dalej, a lista B ma podobną liczbę ramek danych 1 $, 2 $, 3 $. Więc funkcja powinna być stosowana dolistA$1,listB$1 ilistA$2,listB$2 ... i tak dalej dla innych ramek danych na liście. W końcu będę miał dziesięć wartości w przypadku porównania 1 (listA$1 ilistB$1) i dla innych.

Czy można to zrobić za pomocą „lapply”?