R Under development (unstable) (2025-01-07 r87537 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.

> library(testthat)
> library(jskm)
> 
> test_check("jskm")
       strata time n.risk
1      rx=Obs    0    630
2      rx=Obs  500    470
3      rx=Obs 1000    372
4      rx=Obs 1500    315
5      rx=Obs 2000    256
6      rx=Obs 2500     90
7      rx=Obs 3000     11
8      rx=Lev    0    620
9      rx=Lev  500    464
10     rx=Lev 1000    360
11     rx=Lev 1500    318
12     rx=Lev 2000    266
13     rx=Lev 2500    107
14     rx=Lev 3000      8
15 rx=Lev+5FU    0    608
16 rx=Lev+5FU  500    498
17 rx=Lev+5FU 1000    425
18 rx=Lev+5FU 1500    387
19 rx=Lev+5FU 2000    328
20 rx=Lev+5FU 2500    127
21 rx=Lev+5FU 3000     14
       strata time n.risk
1      rx=Obs    0    630
2      rx=Obs  365    519
3      rx=Obs  730    417
4      rx=Obs 1095    360
5      rx=Obs 1460    318
6      rx=Obs 1825    288
7      rx=Obs 2190    187
8      rx=Obs 2555     75
9      rx=Obs 2920     13
10     rx=Obs 3285      0
11     rx=Lev    0    620
12     rx=Lev  365    502
13     rx=Lev  730    406
14     rx=Lev 1095    348
15     rx=Lev 1460    319
16     rx=Lev 1825    299
17     rx=Lev 2190    201
18     rx=Lev 2555     87
19     rx=Lev 2920     13
20     rx=Lev 3285      4
21 rx=Lev+5FU    0    608
22 rx=Lev+5FU  365    531
23 rx=Lev+5FU  730    453
24 rx=Lev+5FU 1095    420
25 rx=Lev+5FU 1460    391
26 rx=Lev+5FU 1825    361
27 rx=Lev+5FU 2190    247
28 rx=Lev+5FU 2555    102
29 rx=Lev+5FU 2920     24
30 rx=Lev+5FU 3285      4
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 22 ]
> 
> proc.time()
   user  system elapsed 
   7.28    0.76    8.03