tests/testthat/test_file_loading_and_checking.R

In comoto-pasteur-fr/DNABarcodeCompatibility: A Tool for Optimizing Combinations of DNA Barcodes Used in Multiplexed Experiments on Next Generation Sequencing Platforms

context("")

write.table(DNABarcodeCompatibility::IlluminaIndexesRaw ,
            textfile <- tempfile(),
            row.names = FALSE, col.names = FALSE, quote=FALSE)

test_that("file_loading_and_checking loads file", {
    expect_is(file_loading_and_checking(textfile), "data.frame")
})