sample <- read_stat(file = paste0(system.file("extdata", package = "eva3dm"),"/sample.txt"),
verbose = TRUE)
sample <- read_stat(file = paste0(system.file("extdata", package = "eva3dm"),"/sample.csv"),
verbose = TRUE)
Run the code above in your browser using DataLab