R/getExampleData.R

Defines functions getExampleFile getExampleData

getExampleData <- function(dbg = FALSE)
{
  readEuCodedFile(input.file = getExampleFile(), dbg = dbg)
}

getExampleFile <- function()
{
  extdataFile("example_13508_2.txt")
}

extdataFile <- kwb.utils::createFunctionExtdataFile("kwb.en13508.2")
KWB-R/kwb.en13508.2 documentation built on April 3, 2024, 9:47 a.m.