lex.dutch yes & no

Ghozayel · May 28, 2023 · b92214c · b92214c
1 parent cce470c
commit b92214c
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/R/lex_dutch.R b/R/lex_dutch.R
@@ -4,6 +4,9 @@
 #' @export
 #' @name lex_dutch
 lex_dutch <- function(dataframe) {
+ if(!is.numeric(answerVar$answer)){ anwerVar$answer = ifelse(tolower(answerVar$answer) %in% c("yes", "y"), 1, 0)}
+ stopifnot(all(answerVar$answer %in% c(1,0)))
+}
  #importing the package data
  Data <-
  Lextale::lextale.dutch %>%