High-Performance Open-Source Archive
library(GenTwoArmsTrialSize)
getSizeMean(design="parallel", test="equivalence", alpha=0.05,
beta=0.20, sigma=0.10, k=1, delta=0.05, TTE=0.01,
rho=c(0.05, 0.07), r=0.1)
#> n_trt n_ctl
#> Size 113 113
getSizeProp(design="crossover", test="superiority", alpha=0.05,
beta=0.20, varsigma=c(0.5, 0.5), k=1, seqnumber=2,
delta=0.10, TTE=0, rho=c(0.05, 0.07), r=0.1)
#> n_trt n_ctl
#> Size 86 86
getSizeTTE(design="parallel", test="equality", alpha=0.05, beta=0.20,
varlambda=c(1,2), k=1, ttotal=3, taccrual=1,
gamma=0.00001, delta=1, rho=c(0.05, 0.07), r=0.1)
#> [1] 1.192941
#> [1] 3.759987
#> n_trt n_ctl
#> Size 56 56
getSizeOrd(design="parallel", test="equality", alpha=0.05, beta=0.10,
varcatprob= list(c(0.2,0.5,0.2,0.1),
c(0.378,0.472,0.106,0.044)),
k=1, theta=0.877, delta=0, rho=c(0.05, 0.07), r=0.1)
#> n_trt n_ctl
#> Size 138 138
Need mirroring services?
Contact our team at info@vpspulse.com.
Mirror powered by VPSpulse
Infrastructure sponsored by VPSPulse & Secure Payments by ArionPay.