R Under development (unstable) (2023-12-13 r85679 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2023 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.

> Sys.setenv("R_TESTS" = "")
> library(testthat)
> library(dexter)
> test_check("dexter")

    item_id item_score
1 S4DoShout          2
2 S4DoShout          1

    item_id item_score
1 S4DoShout          1
2000 responses imported.
2000 responses imported.

rules_changed: 1
rules_added: 0 

rules_changed: 0
rules_added: 24 
 [1] "S1DoCurse"   "S1DoScold"   "S1DoShout"   "S1WantCurse" "S1WantScold"
 [6] "S1WantShout" "S2DoCurse"   "S2DoScold"   "S2DoShout"   "S2WantCurse"
[11] "S2WantScold" "S2WantShout" "S3DoCurse"   "S3DoScold"   "S3DoShout"  
[16] "S3WantCurse" "S3WantScold" "S3WantShout" "S4DoCurse"   "S4DoScold"  
[21] "S4DoShout"   "S4WantCurse" "S4WantScold" "S4WantShout"
 [1] "S1DoCurse"   "S1DoScold"   "S1DoShout"   "S1WantCurse" "S1WantScold"
 [6] "S1WantShout" "S2DoCurse"   "S2DoScold"   "S2DoShout"   "S2WantCurse"
[11] "S2WantScold" "S2WantShout" "S3DoCurse"   "S3DoScold"   "S3DoShout"  
[16] "S3WantCurse" "S3WantScold" "S3WantShout" "S4DoCurse"   "S4DoScold"  
[21] "S4DoShout"   "S4WantCurse" "S4WantScold" "S4WantShout"
[ FAIL 0 | WARN 0 | SKIP 2 | PASS 212 ]

══ Skipped tests (2) ═══════════════════════════════════════════════════════════
• On CRAN (2): 'test_latent_cor.R:26:3', 'test_plausible_scores.R:9:3'

[ FAIL 0 | WARN 0 | SKIP 2 | PASS 212 ]
Warning message:
call dbDisconnect() when finished working with a connection 
> # to do, replace skip_on_cran tests in: 
> # test_ability (uses pisa, can easily just simulate a large dataset)
> # test_interaction (find out what the special data condition was)
> # test_oplike (need scr and dat, possible to randomly change the data I guess)
> 
> proc.time()
   user  system elapsed 
  30.09    1.07   24.73