在一系列数字上使用lapply（）

Question

我想以下列方式使用lapply()：

我有一个矢量：

a<-c(1,4,6,8,9,10,11,12,14,19)
y<-1:10
lapply(a, function(x) othermatrix[othermatrix[,2,
    x] == somethingelse[y], 3, x])

我们的想法是使用a中指定的数字，而不是像1:100这样的连续数字序列。但使用一系列连续数字y

如何做到这一点？

Answer 1

您可以使用mapply：

a<-c(1,4,6,8,9,10,11,12,14,19)
y<-1:10

mapply(function(x,y) othermatrix[othermatrix[, 2, x] == somethingelse[y], 3, x], 
       a, y)

第一个参数是函数。其他参数是传递给函数的对象。