Replace slopes_dt with aucs_dt in outlier removal [run_eggla_lmm()]

[burrowsk]

Bug description

In the code that removes outliers in run_eggla_lmm() [lines 461 to 469], should slopes_dt[["egg_id"]] [line 467] be aucs_dt[["egg_id"]] instead. It doesn't make a difference in my dataset, but may in others?

      if (outlier_exclude && sum(outliers_dt[["Outlier"]]) > 0) {
        outliers_to_exclude <- outliers_dt[Outlier == 1]
        for (icol in unique(outliers_to_exclude[["parameter"]])) {
          if (any(grepl("^auc_", icol))) {
            aucs_dt <- data.table::setDF(aucs_dt)
            aucs_dt[
              slopes_dt[["egg_id"]] %in% outliers_to_exclude[parameter %in% icol, ID],
              icol
            ] <- NA_real_

Thanks!

eggla version output

eggla 0.18.5

Checklist

• [X] formatted your issue so it is easier for us to read?
• [X] included a minimal, fully reproducible example in a single .qmd file? Please provide the whole file rather than the snippet you believe is causing the issue.
• [X] documented the version of eggla you're running, by pasting the output from running packageVersion('eggla') in the "eggla version output" text area?
• [X] documented which operating system you're running? If on Linux, please provide the specific distribution as well.