Displaying 1 result from an estimated 1 matches for "x1count".
Did you mean:
x0count
2010 Sep 23
2
Error: attempt to apply non-function
...1 <- 50
num.trials.01 <- 5
LOR01.het.in <- 0.00
num.sims <- 1
simLOR01 <- vector(length=num.trials.01)
simLORSE01 <- vector(length=num.trials.01)
simOR01 <- vector(length=num.trials.01)
trialnum01 <- vector(length=num.trials.01)
x0count <- vector(length = num.trials.01)
x1count <- vector(length = num.trials.01)
## Trial 1, comparison of treatment 1 with treatment 0
for (i in 1:num.trials.01) {
het01 <- rnorm(1,0,LOR01.het.in)
log.odds.ratio.01 <- log(TruOR01) + het01
odds.ratio.01 <- exp (log.odds.ratio.01)
p1.trial01 <- (p0.trial01 * od...