Kudos! [Power / Sample Size]
Hi Hötzi,
I can't follow this, alpha 0.5? Substraction of 1.25% somehow from ... what?
Instead, I propose something along the lines of:
❝ Quick & extremely dirty:
❝ library(PowerTOST)
❝ 100*power.TOST(alpha=0.5, CV=0.3, theta0=0.95, n=40, theta1=0.8, theta2=1)-1.25
❝ # [1] 76.57964
I can't follow this, alpha 0.5? Substraction of 1.25% somehow from ... what?
Instead, I propose something along the lines of:
pwrDK222BE=function(alpha, CV, theta0, theta1, theta2, n)
{
##power the standard way is P(GMR is below theta2)-P(GMR is below theta1)
##and thus we just plug in upper or lower= 1 to get us what we need.
P= power.TOST(alpha=alpha, CV=CV,
theta0=theta0, n=n, theta1=theta1, theta2=theta2)
Plow= power.TOST(alpha=alpha, CV=CV,
theta0=theta0, n=n, theta1=theta1, theta2=1.0)
Phi =power.TOST(alpha=alpha, CV=CV,
theta0=theta0, n=n, theta1=1.0, theta2=theta2)
return(P-Plow-Phi)
}
pwrDK222BE(0.05, 0.3, 0.95, 0.8, 1.25, 40)
[1] 0.7652256
—
Pass or fail!
ElMaestro
Pass or fail!
ElMaestro
Complete thread:
- Denmark Curiosa (1 in 90% CI in 0.8-1.25) zizou 2017-02-05 02:03 [Power / Sample Size]
- Kudos! Helmut 2017-02-05 19:16
- Kudos!ElMaestro 2017-02-05 21:15
- Joking! Helmut 2017-02-06 13:27
- Thanks, and DKMA ElMaestro 2017-02-06 13:46
- Power with a Danish twist Helmut 2017-02-07 15:23
- Danish ultra-conservatism d_labes 2017-02-08 10:57
- Danish ultra-conservatism Helmut 2017-02-08 11:47
- Danish ultra-conservatism d_labes 2017-02-08 10:57
- Power with a Danish twist Helmut 2017-02-07 15:23
- Thanks, and DKMA ElMaestro 2017-02-06 13:46
- Kudos to ElMaestro! d_labes 2017-02-06 15:06
- Plausible Helmut 2017-02-06 17:16
- Plausible to me too d_labes 2017-02-06 20:25
- Plausible to me too ElMaestro 2017-02-06 22:30
- Plausible to me too zizou 2017-02-06 22:42
- THX d_labes 2017-02-07 10:01
- Plausible to me too d_labes 2017-02-06 20:25
- Plausible Helmut 2017-02-06 17:16
- Joking! Helmut 2017-02-06 13:27
- Kudos!ElMaestro 2017-02-05 21:15
- 3D Helmut 2017-02-06 13:47
- Denmark Curiosa (1 in 90% CI in 0.8-1.25) d_labes 2017-02-06 14:54
- Denmark Curiosa (1 in 90% CI in 0.8-1.25) zizou 2017-02-08 21:03
- Alternative CI for BE decision d_labes 2017-02-09 11:18
- Alternative CI for BE decision ElMaestro 2017-02-09 11:36
- Alternative CI for BE decision d_labes 2017-02-09 11:48
- How decidedly odd ElMaestro 2017-02-09 13:28
- How decidedly odd zizou 2017-02-09 14:42
- How decidedly odd ElMaestro 2017-02-09 13:28
- Alternative CI for BE decision Helmut 2017-02-09 13:41
- No alternative d_labes 2017-02-09 20:37
- No alternative ElMaestro 2017-02-10 13:51
- No alternative? mittyri 2017-02-10 15:28
- Dinamarka? d_labes 2017-02-10 20:10
- OT: Czech beer d_labes 2017-02-10 19:57
- No alternative? mittyri 2017-02-10 15:28
- No alternative ElMaestro 2017-02-10 13:51
- No alternative d_labes 2017-02-09 20:37
- Alternative CI for BE decision d_labes 2017-02-09 11:48
- Alternative CI for BE decision ElMaestro 2017-02-09 11:36
- Alternative CI for BE decision d_labes 2017-02-09 11:18
- Denmark Curiosa (1 in 90% CI in 0.8-1.25) zizou 2017-02-08 21:03
- Denmark Curiosa (1 in 90% CI in 0.8-1.25): Gone Helmut 2019-11-08 12:47
- Kudos! Helmut 2017-02-05 19:16