R/file_ext.R

Defines functions file_ext

file_ext <- function(path)
{
    pos <- regexpr("\\.([[:alnum:]]+)$", path)
    ifelse(pos > -1L, substring(path, pos + 1L), "")
}
jeanmathieupotvin/dfp documentation built on Jan. 8, 2020, 2:32 a.m.