# On time interval [0,T], partitioned into 3 regular parts: [0,T/3], [T/3,2T/3] and [2T/3,T],
# define a piecewise constant intensity function
intens <- c(1,2,8)
# generate a PP with total observation time T=10
generatePPConst(intens, 10)
Run the code above in your browser using DataLab