powered by
semispheregen(npts = 200, radius = 10, noise = 1)
temp <- semispheregen()
Run the code above in your browser using DataLab