library(SCORPIUS) library(dplyr) library(purrr) library(testthat) test_check("SCORPIUS")