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/labChartHRV documentation built on June 12, 2022, 3:21 p.m.