Running examples in ‘Epi-Ex.R’ failed
The error most likely occurred in:

> ### Name: twoby2
> ### Title: Analysis of a two by two table
> ### Aliases: twoby2
> ### Keywords: univar htest
> 
> ### ** Examples
> 
> Treat <- sample(c("A","B"), 50, rep=TRUE )
> Resp <- c("Yes","No")[1+rbinom(50,1,0.3+0.2*(Treat=="A"))]
> twoby2( Treat, Resp )                 
2 by 2 table analysis: 
------------------------------------------------------ 
Outcome   : No 
Comparing : A vs. B 

  No Yes    P(No) 95% conf. interval
A  6  17   0.2609    0.1222   0.4723
B 10  17   0.3704    0.2122   0.5623

                                    95% conf. interval
             Relative Risk:  0.7043    0.3024   1.6407
         Sample Odds Ratio:  0.6000    0.1780   2.0223
Conditional MLE Odds Ratio:  0.6062    0.1454   2.3472
    Probability difference: -0.1095   -0.3406   0.1466

             Exact P-value: 0.5456 
        Asymptotic P-value: 0.4099 
------------------------------------------------------
> twoby2( table( Treat, Resp )[,2:1] ) # Comparison the other way round
2 by 2 table analysis: 
------------------------------------------------------ 
Outcome   : Yes 
Comparing : A vs. B 

  Yes No    P(Yes) 95% conf. interval
A  17  6    0.7391    0.5277   0.8778
B  17 10    0.6296    0.4377   0.7878

                                   95% conf. interval
             Relative Risk: 1.1739    0.8047   1.7126
         Sample Odds Ratio: 1.6667    0.4945   5.6174
Conditional MLE Odds Ratio: 1.6497    0.4260   6.8765
    Probability difference: 0.1095   -0.1466   0.3406

             Exact P-value: 0.5456 
        Asymptotic P-value: 0.4099 
------------------------------------------------------
> 
> 
> 
> ### * <FOOTER>
> ###
> options(digits = 7L)
> base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
Time elapsed:  32.187 2.633 35.061 0 0 
> grDevices::dev.off()
Error in grDevices::dev.off() : failed to load sRGB colorspace file
Execution halted
Error: failed to load sRGB colorspace file
Fatal error: error during cleanup