apply styler

Author: MalteKurz

tests/testthat/test-double_ml_plr_export_preds.R

@@ -100,20 +100,23 @@ patrick::with_parameters_test_that("Unit tests for for the export of predictions
       expect_equal(as.vector(double_mlplr_obj$predictions$ml_g),
         as.vector(preds_g$response),
         tolerance = 1e-8)
-      expect_class(double_mlplr_obj$models$ml_g$d[[1]][[1]],
-                   "LearnerRegr")
+      expect_class(
+        double_mlplr_obj$models$ml_g$d[[1]][[1]],
+        "LearnerRegr")
     }
 
     expect_equal(as.vector(double_mlplr_obj$predictions$ml_l),
       as.vector(preds_l$response),
       tolerance = 1e-8)
-    expect_class(double_mlplr_obj$models$ml_l$d[[1]][[1]],
-                 "LearnerRegr")
+    expect_class(
+      double_mlplr_obj$models$ml_l$d[[1]][[1]],
+      "LearnerRegr")
 
     expect_equal(as.vector(double_mlplr_obj$predictions$ml_m),
       as.vector(preds_m$response),
       tolerance = 1e-8)
-    expect_class(double_mlplr_obj$models$ml_m$d[[1]][[1]],
-                 "LearnerRegr")
+    expect_class(
+      double_mlplr_obj$models$ml_m$d[[1]][[1]],
+      "LearnerRegr")
   }
 )