R/pathFounder.R

In gaspardcc/PMMMF:

# path founder @shinyStat
#
# Aims to match the architecture of the project
#
# elh

srcpath <- function(dir = "", file = "")
{
  return(paste0("R/", dir, file))
}

datapath <- function(file="")
{
  return(paste0("data/", file))
}

libpath <- function(s)
{
  return(paste0("libs/", s))
}