Friday, May 3, 2013

RG#104: Rootogram plot

require(latticeExtra)
require(lattice)


library(lattice)
set.seed(1234)
x1 <- rpois(1000, lambda = 25)


plt <- rootogram(~x1, dfun = function(x) dpois(x, lambda = 25))
plt 

 
 

No comments:

Post a Comment

Note: Only a member of this blog may post a comment.