Displaying 1 result from an estimated 1 matches for "pattim".
Did you mean:
pattie
2008 May 02
0
Adaptive design code
...st.0<-sum(y.0<t.first)
eventfirst.a<-sum(y.a<t.first)
### Calculate conditional power at interim look under the original design
# estimate median survival for both groups at first look = number of events
# divided by sum of patient time at interim look (linearized rate)
patTime.0<- sum(pmin((y.0-start.0)[start.0<t.first],t.first-start.0[start.0<t.first]))
patTime.a<- sum(pmin((y.a-start.a)[start.a<t.first],t.first-start.a[start.a<t.first]))
#patTime.0<- sum(t.first-start.0[start.0<t.first])
#patTime.a<- sum(t.first-start.a[start.a<...