my.tte.studyend.GNG <- get.tte.studyend.GNG(m.con.prior = 50,m.trt.prior = 50, HR.prior=1.2,
ARatio=1, HR.obs=1.3, m.obs = 200, HR.tv= 1.4, HR.lrv = 1.25, tau.tv=.1, tau.lrv=.8, tau.ng=.65)
my.tte.studyend.GNG
Run the code above in your browser using DataLab