tests/testthat/helper-get_example_olink_data.R

In OlinkAnalyze: Facilitate Analysis of Proteomic Data from Olink

# load example datasets for Olink Explore products
get_example_data <- function(filename) {
  ref_norm_res_file <- test_path("..", "data", filename)
  #check that file exists
  expect_true(file.exists(ref_norm_res_file))
  # read rds data
  readRDS(file = ref_norm_res_file)
}