maxt-t light algorithm implemented

Author: livioivil

README.md

@@ -38,26 +38,32 @@ for(i in 1:length(mods))
 library(jointest)
 res=join_flipscores(mods,n_flips = 5000,        seed = 1, tested_coeffs = "X")
 summary(res)
-#>   Model Coeff  Estimate    Score Std. Error  z value Part. Cor   Pr(>|t|)
-#> 1  mod1     X 1.1254046 19.78375   6.309305 3.135646 0.7605058 0.01739652
-#> 2  mod2     X 0.9552644 15.38036   5.053879 3.043278 0.7608195 0.01519696
-#> 3  mod3     X 1.0121921 14.31866   4.836669 2.960437 0.7643816 0.01859628
-#> 4  mod4     X 1.1696906 17.62979   5.875380 3.000621 0.7501552 0.00799840
+#>   Model Coeff  Estimate    Score Std. Error  z value Part. Cor          p
+#> 1  mod1     X 1.1254046 19.78375   6.309305 3.135646 0.7605058 0.01499700
+#> 2  mod2     X 0.9552644 15.38036   5.053879 3.043278 0.7608195 0.01339732
+#> 3  mod3     X 1.0121921 14.31866   4.836669 2.960437 0.7643816 0.01279744
+#> 4  mod4     X 1.1696906 17.62979   5.875380 3.000621 0.7501552 0.00979804
+```
+
+``` r
 summary(combine(res))
-#>   Coeff Stat nMods        S          p
-#> 1     X maxT     4 19.78375 0.01879624
-res=p.adjust.fwer(res)
+#>     Model Coeff Stat nMods        S          p
+#> 1 Overall     X maxT     4 19.78375 0.00739852
+```
+
+``` r
+res=jointest:::p.adjust.jointest(res)
 summary(res)
-#>   Model Coeff  Estimate    Score Std. Error  z value Part. Cor   Pr(>|t|)
-#> 1  mod1     X 1.1254046 19.78375   6.309305 3.135646 0.7605058 0.01739652
-#> 2  mod2     X 0.9552644 15.38036   5.053879 3.043278 0.7608195 0.01519696
-#> 3  mod3     X 1.0121921 14.31866   4.836669 2.960437 0.7643816 0.01859628
-#> 4  mod4     X 1.1696906 17.62979   5.875380 3.000621 0.7501552 0.00799840
-#>        p.adj
-#> 1 0.01879624
-#> 2 0.02019596
-#> 3 0.02019596
-#> 4 0.01879624
+#>   Model Coeff  Estimate    Score Std. Error  z value Part. Cor          p
+#> 1  mod1     X 1.1254046 19.78375   6.309305 3.135646 0.7605058 0.01499700
+#> 2  mod2     X 0.9552644 15.38036   5.053879 3.043278 0.7608195 0.01339732
+#> 3  mod3     X 1.0121921 14.31866   4.836669 2.960437 0.7643816 0.01279744
+#> 4  mod4     X 1.1696906 17.62979   5.875380 3.000621 0.7501552 0.00979804
+#>      p.adj
+#> 1 0.019996
+#> 2 0.019996
+#> 3 0.019996
+#> 4 0.019996
 ```
 
 ## References