Cacher is the code snippet organizer for pro developers

# this one give a relatively compact morula
colorvector=colors()[abs(rnorm(256,100,15))]
symbols(rnorm(5000,1,10), rnorm(5000,1,10), circles = runif(5000)*1.3, bg = colorvector, inches = FALSE, fg=colorvector)
 
# ou avec rhyper that gives nicely distributed concentric circles
symbols(rhyper(5000,10,10,10)*1.5, rhyper(5000,10,10,10),
    circles = runif(5000)*0.5, bg = colorvector, inches = FALSE, fg=colorvector)
# the same as above but squares instead of circles
symbols(rhyper(5000,10,10,10)*1.5, rhyper(5000,10,10,10),
    squares= runif(5000)*0.5, bg = colorvector, inches = FALSE, fg=colorvector)
    
# alternate color scale for the above codes
colorvector=colors()[abs(rnorm(256,150,40))]

# More compact morula that is closer to real morulas, and still color scale variation
colorvector=colors()[abs(rnorm(256,100,20))]
symbols(rhyper(5000,10,10,10)*1.5, rnorm(5000,10,10), circles = runif(5000,1,4)*0.3, bg = colorvector, inches = FALSE, fg=colorvector)
symbols(rhyper(5000,10,10,10)*1.5, rhyper(5000,10,10,10)*1.5, circles = runif(5000,1,4)*0.3, bg = colorvector, inches = FALSE, fg=colorvector)