R/file_path.R

Defines functions file_path

## File Name: file_path.R
## File Version: 0.03

file_path <- function( dir, file)
{
    if ( is.null(dir) ){
        p1 <- file
    } else {
        p1 <- file.path(dir, file)
    }
    return(p1)
}
alexanderrobitzsch/miceadds documentation built on Feb. 2, 2024, 10:21 a.m.