powered by
pois.rel.pca(x, lambda.min, lambda.max, len = 10, plot = TRUE, seed = 132)
x <- sim.pois(c(4,10),15,10) pois.rel.pca(x,1,20,len=20,plot=TRUE,seed=132)
Run the code above in your browser using DataLab