R Under development (unstable) (2024-08-29 r87078 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2024 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.

> library(testthat)
> 
> testthat::test_check("iMRMC")
Loading required package: iMRMC
[1] "Runtime for R code"
   user  system elapsed 
   0.22    0.02    0.23 
[1] "Runtime for R code"
   user  system elapsed 
   0.52    0.00    0.51 
[1] "Runtime for R code"
   user  system elapsed 
   0.47    0.01    0.49 
'data.frame':	1000 obs. of  4 variables:
 $ caseID    : chr  "Case1" "Case2" "Case3" "Case4" ...
 $ readerID  : Factor w/ 5 levels "reader1","reader2",..: 1 1 1 1 1 1 1 1 1 1 ...
 $ modalityID: Factor w/ 2 levels "testA","testA*": 1 1 1 1 1 1 1 1 1 1 ...
 $ score     : num  -1.1901 -1.0353 -1.8316 1.5927 0.0671 ...
[1] ""
modality A mean shift, neg =  0.07790319 
modality A mean shift, pos =  0.9135697 
modality B mean shift, neg =  -0.1750383 
modality B mean shift, pos =  0.8659156 
'data.frame':	880 obs. of  4 variables:
 $ readerID  : Factor w/ 6 levels "truth","reader1",..: 1 1 1 1 1 1 1 1 1 1 ...
 $ caseID    : Ord.factor w/ 80 levels "negCase1"<"negCase2"<..: 1 2 3 4 5 6 7 8 9 10 ...
 $ modalityID: Factor w/ 3 levels "truth","testA",..: 1 1 1 1 1 1 1 1 1 1 ...
 $ score     : num  0 0 0 0 0 0 0 0 0 0 ...

uStat11.jointD.identity 
$mean
         A          B    AminusB 
0.91356967 0.86591565 0.04765402 

$var
         A          B    AminusB 
0.04841548 0.02890617 0.03198493 


uStat11.conditionalD.identity 
$mean
         A          B    AminusB 
0.91356967 0.86591565 0.04765402 

$var
         A          B    AminusB 
0.04841548 0.02890617 0.03198493 


uStat11.jointD.diff 
$mean
              AminusB               CminusD AminusB.minus.CminusD 
           0.04765402           -0.04765402            0.09530804 

$var
              AminusB               CminusD AminusB.minus.CminusD 
           0.03198493            0.03198493            0.12793972 


uStat11.conditionalD.diff 
$mean
              AminusB               CminusD AminusB.minus.CminusD 
           0.04765402           -0.04765402            0.09530804 

$var
              AminusB               CminusD AminusB.minus.CminusD 
           0.03198493            0.03198493            0.12793972 


uStat11.jointD.identity 
$mean
         A          B    AminusB 
1.19898868 1.14801549 0.05097319 

$var
           A            B      AminusB 
 0.016959055  0.028111288 -0.001846576 


uStat11.conditionalD.identity 
$mean
         A          B    AminusB 
1.19898868 1.14801549 0.05097319 

$var
           A            B      AminusB 
-0.004502460  0.006985771 -0.006778559 


uStat11.jointD.diff 
$mean
              AminusB               CminusD AminusB.minus.CminusD 
         0.0005571069         -0.0005571069          0.0011142137 

$var
              AminusB               CminusD AminusB.minus.CminusD 
           0.02589141            0.02589141            0.10356564 


uStat11.conditionalD.diff 
$mean
              AminusB               CminusD AminusB.minus.CminusD 
         0.0005571069         -0.0005571069          0.0011142137 

$var
              AminusB               CminusD AminusB.minus.CminusD 
           0.01610192            0.01610192            0.06440770 

[ FAIL 0 | WARN 0 | SKIP 0 | PASS 37 ]
> 
> proc.time()
   user  system elapsed 
   6.39    0.32    6.70