Добавление второго аргумента в функцию lapply

Question

Итак, у меня есть функция f(x1) как часть приложения Shiny, которая развернута следующим образом:

y <- lapply(input$A, FUN = f)

В процессе исправления ошибок я поняла, что мне нужно добавить второй аргумент , делая его f(x1, x2), где x2 - это другое input. Но этот код ...

y <- lapply(input$A, FUN = f(..., input$B))

... выдает ошибку, говорящую о том, что я неправильно использую .... Может кто-нибудь подскажет, какой должен быть правильный синтаксис?

Answer 1

Вместо lapply мы можем использовать Map/mapply для нескольких аргументов (при условии, что длина 'input $ A', 'input $ B' одинакова)

Map(f, input$A, input$B)

С lapply, опция может быть l oop по последовательности ввода $ A

lapply(seq_along(input$A), function(i) f(input$A[i], input$B[i]))

---

или с purrr

library(purrr)
map2(input$A, input$B, f)