Skip to content

Commit

Permalink
Merge pull request #3 from jordenrabasco/main
Browse files Browse the repository at this point in the history
Testing data updates
  • Loading branch information
jlmaier12 authored Dec 14, 2024
2 parents 6ff8f10 + 78f9534 commit 923916c
Show file tree
Hide file tree
Showing 4 changed files with 5 additions and 5 deletions.
Binary file modified R/sysdata.rda
Binary file not shown.
2 changes: 1 addition & 1 deletion tests/testthat/test-TrIdentClassifier.R
Original file line number Diff line number Diff line change
Expand Up @@ -5,5 +5,5 @@ test_that("default_TridentClassifer", {
VLPpileup = VLPFractionSamplePileup,
WCpileup = WholeCommunitySamplePileup
)
expect_equal(temp_tri_results, trident_results_v1)
expect_equal(temp_tri_results, TrIdentOutput)
})
2 changes: 1 addition & 1 deletion tests/testthat/test-plotTrIdentResults.R
Original file line number Diff line number Diff line change
Expand Up @@ -10,7 +10,7 @@ test_that("plotTrIdentResults", {
WCpileup = WholeCommunitySamplePileup,
TrIdentResults = TrIdent_results
)
copied_TrIdent_patternmatches <- TrIdent_patternmatches$plot
copied_TrIdent_patternmatches <- TrIdentPlots$plot
temp_patternmatcher <- temp_patternmatcher$plot
expect_equal(copied_TrIdent_patternmatches, temp_patternmatcher)
})
6 changes: 3 additions & 3 deletions tests/testthat/test-specializedTransductionID.R
Original file line number Diff line number Diff line change
Expand Up @@ -9,7 +9,7 @@ test_that("specializedTransductionID", {
VLPpileup = VLPFractionSamplePileup,
TrIdentResults = TrIdent_results
)
copied_Specialized_transduction <- Specialized_transduction
copied_Specialized_transduction <- SpecTransduc
temp_plot <- temp_Specialized_transduction$Plots$plot
copied_plot <- copied_Specialized_transduction$Plots$plot
expect_equal(
Expand All @@ -23,9 +23,9 @@ test_that("specializedTransductionID", {
TrIdentResults = TrIdent_results,
specificContig = "NODE_62"
)
copied_Specialized_transduction_NODE62 <- Specialized_transduction_NODE62
copied_Specialized_transduction_NODE62 <- SpecTransduc_node62
expect_equal(
temp_Specialized_transduction_n44$Plots$plot,
temp_Specialized_transduction_n62$Plots$plot,
copied_Specialized_transduction_NODE62$Plots$plot
)
})
Expand Down

0 comments on commit 923916c

Please sign in to comment.