Wie kombiniere ich rapply() und mapply() oder wie benutze ich mapply/Map rekursiv?

Question

Ich frage mich, ob es eine einfache Möglichkeit gibt, die Funktionen rapply(, how = "replace") und mapply() zu kombinieren, um mapply() auf verschachtelten Listen rekursiv zu verwenden.

Zum Beispiel, ich habe zwei verschachtelte Listen:

A = list(list(c(1,2,3), c(2,3,4)), list(c(4,3,2), c(3,2,1))) 
B = list(list(c(1,2,3), c(2,3,4)), list(c(4,3,2), c(3,2,1))) 

Sagen wir, ich function(x, y) x + y an alle entsprechenden Elemente in A und B und die Erhaltung der verschachtelten Struktur anwenden möchten. Das gewünschte Ergebnis würde

result = list(list(c(2,4,6), c(4,6,8)), list(c(8,6,4), c(6,4,2))) 

sein Ich denke, das ein mapply() Analogon von rapply(x, f, how = "replace") sein sollte, aber konnte nicht herausfinden, wie sie zu integrieren. Könnte mir jemand bitte ein paar Hinweise geben?

Eine andere schnelle Frage ist, die in der Regel schneller für intensive Berechnung, verschachtelte Listen oder mehrdimensionale Arrays ist? Alle Kommentare werden sehr geschätzt!

Answer 1

Oder Sie können eine rekursive Funktion mit Map kombiniert schreiben dies zu erreichen, die so lange funktioniert, wie A und B haben die gleiche Struktur:

s <- function(x, y) tryCatch(x + y, error = function(e) Map(s, x, y)) 
s(A, B) 

[[1]] 
[[1]][[1]] 
[1] 2 4 6 

[[1]][[2]] 
[1] 4 6 8 


[[2]] 
[[2]][[1]] 
[1] 8 6 4 

[[2]][[2]] 
[1] 6 4 2 

Nicht sicher, ob Sie rapply in diesem Fall verwenden können, die Durchläuft eine einzelne Liste rekursiv. Um aber gleichzeitig zwei Listen rekursiv zu durchlaufen, benötigen Sie eine höhere Rekursionsstufe? Liege ich falsch?

Answer 2

Sie Map rekursiv (zweimal) verwenden können, um dies zu erreichen:

Map(function(i, j) Map(function(x, y) x + y, i, j), A, B) 

[[1]] 
[[1]][[1]] 
[1] 2 4 6 

[[1]][[2]] 
[1] 4 6 8 


[[2]] 
[[2]][[1]] 
[1] 8 6 4 

[[2]][[2]] 
[1] 6 4 2 

mapply zu verwenden, würden Sie brauchen = FALSE zu vereinfachen, aber das ist die Standardeinstellung für Map. Die äußeren Listenelemente werden dem ersten Map und die inneren Listenelemente dem zweiten Map zugeführt.