Error in `tempdir(check)`: NA in coercion to boolean

test_that("list_fastq_files function works fine", {
test_that("rename_samples_otu_table function works fine when taxa_are_rows", {
data_fungi_row <- clean_pq(data_fungi, force_taxa_as_rows = TRUE)
test_that("rename_samples_otu_table function works fine when taxa_are_columns", {
test_that("track_wkflow function works fine", {
obj_names = c("Fastq.files", "data_fungi", "Enterotype")
test_that("track_wkflow function works fine with taxonomy_rank", {
expect_s3_class(track_wkflow(list(data_fungi, enterotype), taxonomy_rank = c(3, 5)), "data.frame")
tree_A10_005 <- subset_samples(data_fungi, Tree_name == "A10-005")
test_that("track_wkflow_samples function works fine", {
dada(derep_R1_001, selfConsist = TRUE, multithread = TRUE)
test_that("track_wkflow_samples function works fine with object of class matrix, dada and derep", {
test_that("select_one_sample function works fine", {
test_that("subsample_fastq function works fine", {
test_that("sample_data_with_new_names function works fine", {
sam_file <- system.file("extdata", "sam_data.csv", package = "MiscMetabar")
expect_silent(newdf <- sample_data_with_new_names(sam_file, paste0("Samples_", seq(1, 185))))
system.file("extdata", "sam1F.fastq.gz", package = "dada2"),
system.file("extdata", "sam2F.fastq.gz", package = "dada2")
system.file("extdata", "sam1R.fastq.gz", package = "dada2"),
system.file("extdata", "sam2R.fastq.gz", package = "dada2")
expect_silent(filt_fastq_fw <- filter_trim(testFastqs_fw, output_fw = tempdir()))
test_that("add_info_to_sam_data function works fine with data_fungi", {
variable_1 = runif(n = nsamples(data_fungi), min = 1, max = 20),
variable_2 = runif(n = nsamples(data_fungi), min = 1, max = 2)

"rename_samples_otu_table function works fine when taxa_are_rows"
"rename_samples_otu_table function works fine when taxa_are_columns"
"track_wkflow function works fine with taxonomy_rank"
"track_wkflow_samples function works fine with object of class matrix, dada and derep"
"add_info_to_sam_data function works fine with data_fungi"