fix: add "indo" to condition since it's used in the function

Author: signekb

data-raw/simulate-data.R

@@ -152,7 +152,7 @@ insert_specific_atc <- function(data, proportion = 0.3) {
 # Insert a few cases where purchases of metformin are used for other purposes
 # than diabetes.
 insert_false_metformin <- function(data, proportion = 0.05) {
-  if (all(c("atc", "name") %in% colnames(data))) {
+  if (all(c("atc", "name", "indo") %in% colnames(data))) {
     data |>
       dplyr::mutate(
         atc = dplyr::if_else(