Ich habe 2 Matrizen mit unterschiedlichen Parametern: M1 und M3 mit den gleichen Abmessungen. Ich mache gerne einen spaltenweisen Grangertest in R.

M1<- matrix( c(2,3, 1, 4, 3, 3, 1,1, 5, 7), nrow=5, ncol=2) 
M3<- matrix( c(1, 3, 1,5, 7,3, 1, 3, 3, 4), nrow=5, ncol=2)

Ich möchte einen Kausaltest für einen Granger durchführen, um festzustellen, ob M2 Granger M1 verursacht. Meine tatsächlichen Matrizen enthalten mehr Spalten und Zeilen, aber dies ist nur ein Beispiel. Der ursprüngliche Code zwischen zwei Vektoren ist unten:

library(lmtest)
data(ChickEgg)
grangertest(chicken ~ egg, order = 3, data = ChickEgg)

Wie schreibe ich dies für eine spaltenweise Analyse so, dass eine Matrix mit 2 Zeilen ("F [2]" und "Pr (> F) [2]") und zwei Spalten als Ergebnis zurückgegeben wird?