Why simulate a simple AB|BA at all? [RSABE / ABEL]

posted by Helmut Homepage – Vienna, Austria, 2014-07-21 18:14 (4359 d 13:47 ago) – Posting: # 13284
Views: 15,598

Hi ElMaestro,

❝ d_labes should publish a commentary in the journal. I think his figures were sort of more telling weren't they?


Yes. Given the unpleasant experience we had last year submitting a letter to the namely journal I’m not sure whether he will risk the efforts…

BTW, I have some mixed feelings about the paper. I don’t have the slightest idea why the authors simulated the rejection rate for a conventional 2×2 cross-over. Power can be directly calculated for any given combination of α, CV, GMR, and N. One should never ever get anything >0.05! So where does this hump at N>30 in Fig. 1 come from?
Try:

library(PowerTOST)
n   <- seq(8, 100, 2)
CV  <- c(10, 20, seq(30, 55, 5))
pBE <- vector("numeric", length=length(n))
clr <- colorRampPalette(c("blue", "red"))(length(CV))
for(j in seq_along(CV)) {
  for(k in seq_along(n)) {
    pBE[k] <- power.TOST(CV=CV[j]/100, theta0=1.25, n=n[k])
    if(j == 1 & k == length(n)) {
      plot(n, pBE, type="l", ylim=c(0, 0.05), las=1, lwd=2, col=clr[j])
      abline(h=0.05, lty=3)
    }
  }
  lines(n, pBE, type="l", lwd=2, col=clr[j])
  text(n[j], pBE[j], labels=paste0(CV[j],"%"))
}


Another point are the number of simulations. We know the slow convergence in these kind of sim’s. 5,000 for power and 10,000 for empiric α are by a factor of 100 too low.

❝ […] one of the authors used to be a member of the PK subgroup back in the day.


Interesting.

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,655 posts in 4,993 threads, 1,572 registered users;
303 visitors (0 registered, 303 guests [including 24 identified bots]).
Forum time: 08:01 CEST (Europe/Vienna)

The real struggle is not between the right and the left
but between the party of the thoughtful
and the party of the jerks.    Jimmy Wales

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