"vs_uchime_denovo errors if only one output file is given"
"nonchimeras and chimeras must either both be specified or both unspecified."
"vs_uchime_denovo returns tibble with chimeras and stats"
"vs_uchime_denovo works with tibble input"
"vs_uchime_denovo writes output files when paths are specified"
"vs_uchime_denovo joins otu_id when present in input"
"vs_uchime_denovo returns empty chimera table when none found"
"vs_uchime_denovo preserves all extra columns from input tibble"

vs_uchime_denovo errors if only one output file is given

vs_uchime_denovo returns tibble with chimeras and stats

vs_uchime_denovo works with tibble input

vs_uchime_denovo writes output files when paths are specified

vs_uchime_denovo joins otu_id when present in input

vs_uchime_denovo returns empty chimera table when none found

vs_uchime_denovo preserves all extra columns from input tibble

expect_error(vs_uchime_ref(fasta_input = "missing_file.fa", database = "db.fa"),
"Cannot find input file: missing_file.fa")
test_that("error when only one of nonchimeras/chimeras is provided", {
vs_uchime_ref(fasta_input = fasta, database = db, nonchimeras = "nonchim.fa"),
test_that("vs_uchime_ref returns nonchimeras tibble with attributes", {
db <- test_path("testdata", "R1.fasta") # Needs to be updated with a real e
out <- vs_uchime_ref(fasta_input = fasta, database = db)
test_that("vs_uchime_ref writes files with relabel and log", {
test_that("vs_uchime_ref works with FASTA tibble as input", {
out <- vs_uchime_ref(fasta_input = fasta_tbl,
test_that("vs_uchime_ref returns empty data frame for chimeras if none found", {
out <- vs_uchime_ref(fasta_input = fasta,

"Cannot find input file: missing_file.fa"
"error when only one of nonchimeras/chimeras is provided"
"vs_uchime_ref returns nonchimeras tibble with attributes"
"vs_uchime_ref writes files with relabel and log"
"vs_uchime_ref works with FASTA tibble as input"
"vs_uchime_ref returns empty data frame for chimeras if none found"

error when only one of nonchimeras/chimeras is provided

vs_uchime_ref returns nonchimeras tibble with attributes