merciless tester! [🇷 for BE/BA]

posted by Helmut Homepage – Vienna, Austria, 2016-03-07 19:56 (3391 d 21:59 ago) – Posting: # 16071
Views: 11,332

Hi Shuanghe,

❝ I noticed that at certain combinations PowerTOST would produce errors. e.g., with the following values

❝ sampleN.scABEL(alpha = 0.05, targetpower = 0.8, theta0 = 0.91,

❝                     CV = 0.1, design = "2x2x4", regulator = "EMA")

❝ would produce error

Error in if (pwr <= targetpower) cat(n, " ", formatC(pwr, digits = pd,  :

❝   missing value where TRUE/FALSE needed

Confirmed.

❝ These error only appear when CV is extremely low so in practice it doesn't matter since no one will use 2x2x4 replicate study for product with ISCV of 10%.


Right. :-D

❝ […] can anyone tell me what's going on here? Maybe it's apparent for R gurus but as R novice I have no idea what the message says.


At such a low CV you could use sampleN.TOST() to get a first idea:
library(PowerTOST)
x <- sampleN.TOST(targetpower = 0.8, theta0 = 0.91,
                  CV = 0.1, design = "2x2x4",
                  details = FALSE, print = FALSE)
cat(paste0("n = ", x[["Sample size"]], ", power = ",
           signif(x[["Achieved power"]], 6), "\n"))
n = 6, power = 0.913161


Looking at the source (type sampleN.scABEL in the console) we find
nmin <- 6
down <- FALSE

so I guess it could be possible. Needs some additional error-trapping. Detlew?

Dif-tor heh smusma 🖖🏼 Довге життя Україна! [image]
Helmut Schütz
[image]

The quality of responses received is directly proportional to the quality of the question asked. 🚮
Science Quotes

Complete thread:

UA Flag
Activity
 Admin contact
23,424 posts in 4,927 threads, 1,674 registered users;
41 visitors (0 registered, 41 guests [including 10 identified bots]).
Forum time: 18:56 CEST (Europe/Vienna)

Complex, statistically improbable things are by their nature
more difficult to explain than
simple, statistically probable things.    Richard Dawkins

The Bioequivalence and Bioavailability Forum is hosted by
BEBAC Ing. Helmut Schütz
HTML5