Tee function?

[hadley]

i.e.

tee <- function(x, ...) {
  list(...)
  x
}

Because it looks slightly nicer to my eye? See e.g. r-lib/testthat#482

[hadley]

Also this just occurred to me:

safetee <- function(x, ...) {
  try(list(...))
  x
}

[hadley]

The puns keep coming:

finalitee <- function(x, ..., finally) {
  if (!missing(finally)) 
    on.exit(finally)

  list(...)
  x
}

[smbache]

Love the puns :)

Would these belong in magrittr, though, if we remove the aliases? They could also join them in the nestpas pkg, so magrittr is operators only?

[smbache]

Could we find useful functionality for a fatalitee too ;)

[hadley]

Yeah, might be better in nestpas, although these feel a bit more pipe related than the aliases.

Could also have a tee micropackage.

[smbache]

Maybe that could be called fatalitee :) for no apparent reason.. but the mk voice would play in many minds ...