mapply関数が期待通りに機能しない

Question

大きな関数を書いています。私はmapply関数をリストの上で実行するために使用したいと思います。

私はこれ持っている：私は2つのだけのリストのように結果をしたいと思い

x <- list(1,3, 4, 5) 
y <- list(5,6,7,3) 
res <- mapply(x , y , FUN = function(x, y) double(x + y)) 
[[1]] 
[1] 0 0 0 0 0 0 

[[2]] 
[1] 0 0 0 0 0 0 0 0 0 

[[3]] 
[1] 0 0 0 0 0 0 0 0 0 0 0 

[[4]] 
[1] 0 0 0 0 0 0 0 0 

を。このように：

[[1]] 
0 0 0 0 0 

[[2]] 
0 0 0 0 0 

私は、リストの各要素ではなく、2つのリストの回答を希望します。

どうすればいいですか？

Answer 1

lapply機能を試してください。

my_list(x,y) 
m <- length(my_list) 
lapply(1:m, function(i) double(x[[i]]+y[[i]])) 

あなたのリストの長さは4ですので、出力として2つ以外にすることはできません！