# NOT RUN {
# }
# NOT RUN {
X <- rpoispp(function(x,y) { exp(3+3*x) })
fit <- ppm(X ~x+y)
# }
# NOT RUN {
plot(dffit(fit))
plot(dffit(fit, collapse=TRUE))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab