Bioequivalence and Bioavailability Forum • Power of the GCC framework and power of PowerTOST

Power of the GCC framework and power of PowerTOST [RSABE / ABEL]

posted by d_labes – Berlin, Germany, 2020-11-28 10:20 (166 d 17:33 ago) – Posting: # 22091
Views: 2,016

Dear Helmut,

» Stolen the code of subject data sims and scaled ABE evaluation in the working horse function .pwr.SABE.sds().
» Have a look into the code of the new but undocumented function power.fwl.sds() in the GitHub repository.

there is no need to define and program a new function :cool:

!
Try the following:

# define a new regulator object

regGCC <- reg_const("user", r_const= log(1/0.75)/CV2se(0.3), CVswitch = 0.3, CVcap = 0.3,

                    pe_const=TRUE)

regGCC

USER defined regulatory settings

- CVswitch            = 0.3 

- cap on scABEL if CVw(R) > 0.3

- regulatory constant = 0.9799758 

- pe constraint applied

# verify if the limits are what they should be

scABEL(CV=0.2, regulator = regGCC)

lower upper 

 0.80  1.25 

scABEL(CV=0.3, regulator = regGCC)

lower upper 

 0.80  1.25 

scABEL(CV=0.31, regulator = regGCC)

   lower    upper 

0.750000 1.333333 

scABEL(CV=0.35, regulator = regGCC)

   lower    upper 

0.750000 1.333333 

# use the function already in the package

power.scABEL.sds(CV=0.3, n=40, design="2x2x4", regulator = regGCC, theta0 = 1.25)

[1] 0.20463

Result matches the previous calculations.

—
Regards,

Detlew

Complete thread:

Inflated type I error with fixed widened limits? Helmut 2020-11-25 10:50 [RSABE / ABEL]
- Inflated type I error with fixed widened limits? d_labes 2020-11-25 15:07
  - Inflated type I error with fixed widened limits? Helmut 2020-11-26 00:09
    - Inflated type I error with fixed widened limits d_labes 2020-11-26 15:38
      - Inflated type I error: Not nice Helmut 2020-11-26 17:14
        
        Power of the GCC framework and power of PowerTOSTd_labes 2020-11-28 11:20
        
        Sample sizes (ignoring the inflated TIE) Helmut 2020-11-29 11:21
        
        Bug? d_labes 2020-11-29 16:22
        
        “Feature” Helmut 2020-11-30 00:16
- Inflated type I error with fixed widened limits? wienui 2020-11-29 14:03
  - Inflated type I error with fixed widened limits d_labes 2020-11-29 17:51
    - Inflated type I error with fixed widened limits Helmut 2020-11-30 00:14
      - Inflated type I error with fixed widened limits wienui 2020-11-30 03:30
        
        Houston, we have a problem! Helmut 2020-11-30 14:42
        
        Paradox of tolerance Astea 2020-12-01 23:34
        
        Οὐτοπεία ∨ Εὐτοπεία Helmut 2020-12-02 01:37
        
        Uchronia Astea 2020-12-02 09:46
        
        Steampunk Helmut 2020-12-02 11:34
        
        Dieselpunk Astea 2020-12-02 15:28
        
        Dieselpunk Helmut 2020-12-02 16:18
        
        Steampunk? OT d_labes 2020-12-02 19:30
        
        Steampunk? OT Astea 2020-12-02 19:58
        
        PowerTOST 1.5-2.9000 on GitHub Helmut 2020-12-23 12:18