View source: R/logger_NIVUS_PCM4.R
| readLogger_NIVUS_PCM4_2 | R Documentation |
Read Logger File from NIVUS PCM4
readLogger_NIVUS_PCM4_2( filepath, headerRow = 9, sep = "\t", maxCols = 50, removeEmptyColumns = FALSE )
filepath |
full path to logger file |
headerRow |
number of row containing the header row of the table |
sep |
column separator |
maxCols |
maximum number of columns |
removeEmptyColumns |
if |
http://www.nivus.de/ximages/1397007_p4ba02en.pdf
## Not run:
# set paths to example files (contained in this package)
files <- c(
extdataFile("NIVUS/example_NIVUS_PCM4_ALT.TXT"),
extdataFile("NIVUS/example_NIVUS_PCM4_NEU.TXT"),
extdataFile("NIVUS/example_NIVUS_PCM4_STR.TXT")
)
# read the files
x1 <- readLogger_NIVUS_PCM4_2(files[1L])
x2 <- readLogger_NIVUS_PCM4_2(files[2L])
x3 <- readLogger_NIVUS_PCM4_2(files[3L])
# compare structures
str(x1)
str(x2)
str(x3)
# get metadata
(metadata <- kwb.utils::getAttribute(x1, "metadata"))
# show time adjusts
metadata$timeAdjust
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.