R Under development (unstable) (2025-07-22 r88445 ucrt) -- "Unsuffered Consequences" Copyright (C) 2025 The R Foundation for Statistical Computing Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > # This file is part of the standard setup for testthat. > # It is recommended that you do not modify it. > # > # Where should you do additional test configuration? > # Learn more about the roles of various files in: > # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview > # * https://testthat.r-lib.org/articles/special-files.html > > library(testthat) > library(aRD) > > test_check("aRD") 1000 of 1000 bootstraps completed successfully. Call: aRD(formula = y ~ x1 + x2 + x3, data = data) boot::boot(data = object@data, statistic = f, R = R) Orig. Est. Boot. Est. Boot. SE Bias (Intercept) -0.2656315673 -0.2873566644 0.0290316030 -2.172510e-02 x1 0.0039000088 0.0038738839 0.0012117637 -2.612490e-05 x2 0.0119780292 0.0119816126 0.0023114527 3.583420e-06 x3 0.0001980374 0.0007794322 0.0009888346 5.813948e-04 Boot. RD 5% 95% (Intercept) -0.2873566644 -2.910859e-01 -0.22302505 x1 0.0038738839 1.974591e-03 0.00592125 x2 0.0119816126 8.187897e-03 0.01584450 x3 0.0007794322 -1.517883e-18 0.00238332 1000 of 1000 bootstraps completed successfully. Call: aRD(formula = y ~ x, data = data.frame(y = y, x = x)) boot::boot(data = object@data, statistic = f, R = R) Orig. Est. Boot. Est. Boot. SE Bias Boot. RD (Intercept) -0.157085169 -0.092937214 0.136958488 0.06414796 -0.092937214 x 0.005837794 0.004562534 0.002896189 -0.00127526 0.004562534 2.5% 97.5% (Intercept) -0.380742020 0.07167818 x 0.001324663 0.01147654 FINALES MODELL: Call: aRD(formula = final_formula, data = data, maxit = maxit, solver = solver, verbose = verbose, polish_final = polish_final, eps_abs = eps_abs, eps_rel = eps_rel, conswitch = conswitch, use_nearPD = use_nearPD) Convergence: TRUE Coefficients: Estimate Std. Error z value Pr(>|z|) RD (Intercept) -0.21068856 0.050105539 -4.204896 2.612027e-05 -0.21068856 x2 0.01429893 0.001794322 7.968989 1.599773e-15 0.01429893 2.5% 97.5% (Intercept) -0.30889361 -0.11248351 x2 0.01078212 0.01781574 Iterations: 4 Stability Investigations: EPV (Events per Variable): 73.33 FINALES MODELL: Call: aRD(formula = final_formula, data = data, maxit = maxit, solver = solver, verbose = verbose, polish_final = polish_final, eps_abs = eps_abs, eps_rel = eps_rel, conswitch = conswitch, use_nearPD = use_nearPD) Convergence: TRUE Coefficients: Estimate Std. Error z value Pr(>|z|) RD (Intercept) -0.21068856 0.050105539 -4.204896 2.612027e-05 -0.21068856 x2 0.01429893 0.001794322 7.968989 1.599773e-15 0.01429893 2.5% 97.5% (Intercept) -0.30889361 -0.11248351 x2 0.01078212 0.01781574 Iterations: 4 Stability Investigations: EPV (Events per Variable): 73.33 [ FAIL 0 | WARN 0 | SKIP 0 | PASS 31 ] > > proc.time() user system elapsed 32.71 1.12 33.86