tests/testthat/example_failing_test/R/transform.R

transform <- function(raw_data) {
  transformed_data <- list()
  transformed_data$people <- raw_data$people[which(raw_data$people$age < 50), ]
  transformed_data
}
vimc/dettl documentation built on Oct. 6, 2022, 2:13 p.m.