powered by
nhpp.mle(x, T1, prob.func, max.val)
nhpp.lik
hpp.mle
intensity <- function(t) pmin(t/3, 1) X = c(0.74, 1.50, 1.67, 2.01, 2.27) nhpp.mle(X, T1=1, prob.func=intensity, max.val = 70)
Run the code above in your browser using DataLab