R/model.dir.R

Defines functions model.dir

Documented in model.dir

#' @rdname TAF-internal
#'
#' @export

## Model directory name

model.dir <- function()
{
  if(!dir.exists("model") && dir.exists("method"))
    "method"
  else
    "model"
}

Try the TAF package in your browser

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

TAF documentation built on March 31, 2023, 6:51 p.m.