function to generate almost uniformly points on a sphere