# NOT RUN {
#--- sample data ---#
D = rmst2perm.sample.data()
time = D$time
status = D$status
arm = D$arm
tau = 34
mperm = c(1:6)
nperm = 100 #--This number is only for the example.
#--It is recommended to specify at least 100K (default) or larger.
seed = 123
a = rmst2perm(time=time, status=status, arm=arm,
tau=tau, mperm=mperm, nperm=nperm, seed=seed)
print(a)
# }
Run the code above in your browser using DataLab