tests/testthat/helper-test.R

# Paths -------------------------------------------------------------------



path_hrv <- labChartHRV_example("HRV")
path_hrv1 <- labChartHRV_example("HRV/file1.txt")


# Raw HRV Character -------------------------------------------------------


hrv_chr_raw <- readtext::readtext(path_hrv, encoding = "UTF-16LE")$text
hrv1_chr_raw <- readtext::readtext(path_hrv1, encoding = "UTF-16LE")$text
Lightbridge-KS/sipsANS documentation built on June 11, 2022, 8:12 a.m.