pmap example with constant second argument

pmap_fixed_argument.md

library(tidyverse)

x <- list(1, 2, 3)
y <- list(3, 3, 3)
z <- list(100, 200, 300)

j <- function(first, second, third) (first + third) * second


pmap(list(x, z), j, second=3)
#> [[1]]
#> [1] 303
#> 
#> [[2]]
#> [1] 606
#> 
#> [[3]]
#> [1] 909

pmap(list(x, y, z), j)
#> [[1]]
#> [1] 303
#> 
#> [[2]]
#> [1] 606
#> 
#> [[3]]
#> [1] 909

^{Created on 2021-01-21 by the reprex package (v0.3.0)}