Skip to content

Commit

Permalink
Remove buggy code that was only commented out
Browse files Browse the repository at this point in the history
  • Loading branch information
JTPetter committed Oct 2, 2023
1 parent 6dcf97c commit 42f1101
Showing 1 changed file with 0 additions and 4 deletions.
4 changes: 0 additions & 4 deletions R/msaAttribute.R
Original file line number Diff line number Diff line change
Expand Up @@ -300,10 +300,8 @@ msaAttribute <- function(jaspResults, dataset, options, ...) {
}

for (measurement in measurements) {
# if (is.numeric(dataset[[measurement]])) {
dataset[measurement] <- as.character(dataset[[measurement]])
dataset[standards] <- as.character(dataset[[standards]])
# }
}

matchesWithin <- vector(mode = "numeric")
Expand Down Expand Up @@ -482,9 +480,7 @@ msaAttribute <- function(jaspResults, dataset, options, ...) {
numberInspected <- length(unique(dataset[[parts]]))

for (measurement in measurements) {
# if (is.numeric(dataset[[measurement]])) {
dataset[measurement] <- as.character(dataset[[measurement]])
# }
}

matchesWithin <- vector(mode = "numeric")
Expand Down

0 comments on commit 42f1101

Please sign in to comment.