R/utils.R

Defines functions new_data_frame

new_data_frame <- function(x, nrow = length(x[[1]])) {
  tibble::new_tibble(x, nrow = nrow)
}

`%||%` <- function (x, y) {
  if (is.null(x)) y else x
}

Try the wkutils package in your browser

Any scripts or data that you put into this service are public.

wkutils documentation built on Jan. 22, 2023, 1:50 a.m.