Bioequivalence and Bioavailability Forum • Bug?

Bug? [RSABE / ABEL]

posted by d_labes – Berlin, Germany, 2020-11-29 17:22 (1242 d 08:53 ago) – Posting: # 22094
Views: 5,737
(edited by d_labes on 2020-11-29 17:57)

Dear Helmut,

❝ PS: Do we have a bug in scABEL()?

❝ CV <- c(0.3, 0.3+10^(-6:-2))

❝ lim <- scABEL(CV)

❝ res <- data.frame(CV = CV, L = lim[, 1], U = lim[, 2])

❝ print(res, row.names = FALSE)

❝

❝ CV L U

❝ 0.300000 0.8000000 1.250000

❝ 0.300001 0.8000296 1.249954

❝ 0.300010 0.8000244 1.249962

❝ 0.300100 0.7999731 1.250042

❝ 0.301000 0.7994604 1.250844

❝ 0.310000 0.7943616 1.258873

Not a bug

, it's a feature :cool:

!
Reason: r_const=0.76.
With r_const <- log(1.25)/CV2se(0.3) = 0.7601283... we get

       CV         L        U

 0.300000 0.8000000 1.250000

 0.300001 0.7999994 1.250001

 0.300010 0.7999943 1.250009

 0.300100 0.7999430 1.250089

 0.301000 0.7994302 1.250891

 0.310000 0.7943307 1.258922

Satisfied?

—
Regards,

Detlew

Complete thread:

Inflated type I error with fixed widened limits? Helmut 2020-11-25 10:50
- 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 PowerTOST d_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