pmap is confusing

pmap_with_extra_arg_passed_to_function.R

library(tidyverse)

d <- tibble(batch = c('one', 'two', 'three'), 
            device = c('a','b','c'), 
            num = c(1,2,3))

myfunc1 <- function(batch, device, num) {
  return(paste0(batch, '_', device, '_', 10+num))
}

myfunc2 <- function(batch, device, num, w) {
  return(paste0(batch, '_', device, '_', w + num))
}


x1 <- pmap(d, myfunc1)

x2 <- pmap(d, myfunc2, w=10)

# x1 and x2 are the same