enexpr_when.R

library(rlang)

enexpr_first <- function(x, aggr_func) {
  browser()
  func <- enexpr(aggr_func)
  x <- aggr_func(x)
  list(x = x, f = func)
}

enexpr_second <- function(x, aggr_func) {
  browser()
  x <- aggr_func(x)
  func <- enexpr(aggr_func)
  list(x = x, f = func)
}

Do you think it makes sense to update the f objects (lines 7, 8, 14, and 15) with something other than f? If using browser() mode, inspecting the f object terminates the browsing session.

Thanks @Chris-Engelhardt, I didn't know about f being a browser() mode keyword (cool TIL!)

I didn't either, @gadenbuie, until I tried stepping through your function in browser() mode. Thanks also for teaching me about purrr::partial()!