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 a high-speed mirror for your open-source project?
Contact our mirror admin team at info@clientvps.com.
This archive is provided as a free public service to the community.
Proudly supported by infrastructure from VPSPulse , RxServers , BuyNumber , UnitVPS , OffshoreName and secure payment technology by ArionPay.