Verified Commit 46b927ef authored by Cody L Marquart's avatar Cody L Marquart
Browse files

Testhat dep

parent 07b1f06a
Pipeline #45808 canceled with stages
......@@ -16,7 +16,7 @@ Imports:
rhoR,
cli
Suggests:
testthat (>= 2.1.0),
testthat,
knitr,
rmarkdown
RoxygenNote: 6.1.1
......
......@@ -12,7 +12,8 @@
differences <- function(code = NULL, wh = "trainingSet", to = "computerSet") {
comparing = merge.sets(code, wh, to);
# comparing[comparing[,2] != comparing[,3], 1]
comparing[rowSums(comparing[,-c(1)]) == 1, 1]
# comparing[rowSums(comparing[,-c(1)]) == 1, 1]
comparing[comparing[,2] != comparing[,3],1]
}
merge.sets <- function(code, wh = "trainingSet", to = "computerSet") {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment