style: make code easier to read

TASK-no · Feb 19, 2024 · e1df7cb · e1df7cb
1 parent f79a5b0
commit e1df7cb
Showing 1 changed file with 6 additions and 5 deletions.
diff --git a/R/mod_07_B_logistics_classification_run.R b/R/mod_07_B_logistics_classification_run.R
@@ -59,15 +59,16 @@ mod_logistics_classification_run_server <- function(id, class_logistics_data){
         list(true_ones = true_ONES,
              predictions = predictions)
       }
-      )
+    )
     shiny::observeEvent(
       {
         input[["run_logistic_classification"]]
       },
       {
-      output$plotROC <- plot_roc(list_rp()$true_ones, list_rp()$predictions)
-      output$rocTEXT <- output_roc_text(list_rp()$true_ones,
-                                        list_rp()$predictions)
+      true_ones   <- list_rp()$true_ones
+      predictions <- list_rp()$predictions
+      output$plotROC <- plot_roc(true_ones, predictions)
+      output$rocTEXT <- output_roc_text(true_ones, predictions)
       output$infoTEXT <- output_info_text()
       }
     )
@@ -86,4 +87,4 @@ mod_logistics_classification_run_server <- function(id, class_logistics_data){
       ignoreInit = FALSE
       )
   })
-}
+}