This model delivers the distribution
of the radius of a ball
obtained by the
intersection of a balldim-dimensional ball
with diameter R by a $spacedim$-dimensional
hyperplane that has uniform
distance from the center.
RFoptions(seed=0) ## *ANY* simulation will have the random seed 0; set## RFoptions(seed=NA) to make them all random againhist(RFrdistr(RRspheric(balldim=2), n=1000), 50)