Как я могу применить к массиву и скаляру?

Question

Если у меня есть массив

a = c(1,2,3,1,2,3,1,2,3,1,2,3) 

Я хотел бы применить функцию «которая» для каждого скаляра в соотношении 1: 3

l = list() 
for(i in 1:3){ 
l[[i]] = which(a == i) 
} 

как я векторизации эту операцию с примениться, lapply, Карта?

Answer 1

Главный аргумент lapply должен быть размером элементов списка, в котором вы хотите закончить. Который является то, что вы цикл над вашей for например, так:

a = c(1,2,3,1,2,3,1,2,3,1,2,3) 
lapply(1:3, function(x) which(a == x)) 

В качестве альтернативы, если вы не хотите, чтобы закодировать a в анонимной функции вы можете использовать:

lapply(1:3, function(x, y) which(y == x), y = a)