difference result between data.frame() with tibble()

[perlatex]

I asked on the forum, but no one replied. So I'm here for help

library(tidyverse)

myfun1 <- function(v1) {
  data.frame(
    ID = deparse(substitute(v1))
  )
}
myfun1(v1 = model)
#>      ID
#> 1 model




myfun2 <- function(v1) {
  tibble(
    ID = deparse(substitute(v1))
  )
}
myfun2(v1 = model)
#> # A tibble: 1 × 1
#>   ID   
#>   <chr>
#> 1 v1

[krlmlr]

Thanks. This is due to how tibble() captures arguments. Adding a !! ensures that the call is evaluated in the correct context:

library(tidyverse)

myfun1 <- function(v1) {
  data.frame(
    ID = deparse(substitute(v1))
  )
}
as_tibble(myfun1(v1 = model))
#> # A tibble: 1 × 1
#>   ID   
#>   <chr>
#> 1 model

myfun2 <- function(v1) {
  tibble(
    ID = !!deparse(substitute(v1))
  )
}
myfun2(v1 = model)
#> # A tibble: 1 × 1
#>   ID   
#>   <chr>
#> 1 model

^{Created on 2025-03-18 with reprex v2.1.1}

@lionel-: Do you think tibble() should behave differently here?