r - 将R中的两个列表对象相乘

Question

这个问题在这里已经有了答案:





Multiplying Combinations of a list of lists in R

(4 个回答)


5年前关闭。




我正在尝试做的事情:
将列表中的对象乘以不同列表中的另一个对象？我需要将列表 A 中的 1000 个值的向量乘以列表 B 中的 1000 个值的向量。

例如:

List_A 中的向量:

1
2
3

List_B 中的向量:

4
5
6

我想要的输出向量，List_A*B:

4
10
18

我在 {lgcp} 包中找到了名为 multiply.list() 的东西，但显然不再存在所有依赖项，所以我无法使用它...我尝试使用 lapply(不起作用，x * l1 中的错误:非-二元运算符的数字参数)和mapply(它创建一个矩阵并且不只是直接将值相乘)。

我在一个循环中完成所有这些，但 cinput.data 和 l1 都是列表的指定部分。

#l2<-lapply(cinput.data, function(x) x*l1)

#l2<-mapply('*',cinput.data, l1)

Answer 1

您可以使用 Map功能。如果需要，这也可以保留数据的列表结构。如果你不这样做，你可以简单地使用 unlist :

Map('*',l1,l2)

[[1]]
[1] 4

[[2]]
[1] 10

[[3]]
[1] 18

资料 :

l1<-list(1,2,3)

l2<-list(4,5,6)