# Calculate the expected number of events in a one-arm clinical trial
TrialPred.OneArm(N=100,d=NULL,l=3,gamma=0.1,s=12,m=6,alpha=1,nu=20)
#Calculate the expected number of events using a list as input
design1 <- list(N=100,d=NULL,l=3,gamma=0.1,s=12,m=6,alpha=1,nu=20)
TrialPred.OneArm(design1=design1)
#Calculate the number of subjects enrolled
TrialPred.OneArm(N=NULL,d=8,l=15,gamma=0.1,s=12,m=6,alpha=1,nu=20)
#Calculate the observation time
TrialPred.OneArm(N=100,d=10,l=NULL,gamma=0.1,s=12,m=6,alpha=1,nu=20)
#Calculate the censoring parameter gamma
TrialPred.OneArm(N=100,d=10,l=10,gamma=NULL,s=12,m=6,alpha=1,nu=20)
Run the code above in your browser using DataLab