R/utils.R

Defines functions namespace_case_when

namespace_case_when <- function(x) {
	names <- names(x)
	x <- gsub("dplyr::case_when", "case_when", x)
	x <- gsub("case_when", "dplyr::case_when", x)
	names(x) <- names
	x
}

Try the orbital package in your browser

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

orbital documentation built on April 3, 2025, 8:47 p.m.