powered by
gammafit(time, event)
c(shape, scale)
n <- 30 t <- rgamma(n, shape=2, scale=100) ev <- round(runif(n), 0) gammafit(t, ev)
Run the code above in your browser using DataLab