powerSST {smartDesign}

Power for Single Sequential Treatment (SST) Trial design clinical trial calculations

Description

Power Calculations Comparing two Single Sequential Treatment Treatment (SST) Trial design clinical trial calculations

Usage

powerSST(sst1, sst2, pG_A1 = 0.8, pG_A2 = 0.8, alpha=0.05)

Arguments

sst1

an object of smartSST class, created by function of the same name

sst2

an object of smartSST class, created by function of the same name

pG_A1

probability of response to therapy given assignment to A1

pG_A2

probability of response to therapy given assignment to A2

alpha

accepted type-I error rate for power calculations

Details

more details to come

Value

An object of the powerSST S3 class, with the following elements:

powerdat:

data.frame with sens, spec, mu, sigsq and sample size, power

Author(s)

Jun (Jessie) He, Aberaham Eyman-Casey, Jason P. Sinnwell, Mayo Clinic

Examples

  sst1 <- smartSST(mu_Barm=c(G1=30, G0=20), sigsq_Barm=c(G1=16,G0=16),
         Barm=1, sens=seq(.6, 1, by=.1),  spec=seq(.6, 1, by=.1),
         nsubject=252)
  sst2 <- smartSST(mu_Barm=c(G1=20, G0=30), sigsq_Barm=c(G1=16,G0=16),
         Barm=2, sens=seq(.6, 1, by=.1),  spec=seq(.6, 1, by=.1),
         nsubject=252)

  psst12 <- powerSST(sst1, sst2)
  print(psst12) ## plot(psst12)