Fixed scope bug

This commit is contained in:
Waldir Leoncio 2020-03-18 15:02:56 +01:00
parent 1e5fa0ea91
commit 5a73d8e212

View file

@ -19,7 +19,7 @@ strcmp <- function(s1, s2) {
} else {
# s1 and s2 are vectors/matrices
if (identical(dim(s1), dim(s2))) {
checks <- as.matrix(s4 == s5)
checks <- as.matrix(s1 == s2)
} else {
stop("Inputs must be the same size or either one can be a scalar.")
}