diff --git a/R/msaAttribute.R b/R/msaAttribute.R index f10d0fe6..092fb0d5 100644 --- a/R/msaAttribute.R +++ b/R/msaAttribute.R @@ -17,16 +17,6 @@ #' @export msaAttribute <- function(jaspResults, dataset, options, ...) { - - # - # dataset <- read.csv("C:/Users/Jonee/Google Drive/JASP/Bugs/GH_Issue_2286/Atribut_Sort.csv") - # options <- list() - # options$measurementsLong <- "Reshenie" - # options$parts <- "Part" - # options$standard <- "Standart" - # options$operators <- "Kontroler" - - wideFormat <- options[["AAAdataFormat"]] == "AAAwideFormat" if (wideFormat){ measurements <- unlist(options$measurements)