Uniform Sampling of a Sphere : TR=IcosahedronMesh - File Exchange

Code covered by the BSD License

Highlights from
Uniform Sampling of a Sphere

TR=IcosahedronMesh Name speaks for itself.
TR=SubdivideSphericalMesh(TR,... Subdivide triangular mesh representing the surface of the unit sphere
TR=TriQuad(TR) Subdivide triangular mesh using triangular quadrisection. During this
X=RandSampleSphere(N,spl) Generate a uniform or stratified sampling of a unit sphere.
[V,Tri,Ue_i,Ue]=ParticleSampl... Create an approximately uniform triangular tessellation of the unit
View all files

from Uniform Sampling of a Sphere by Anton Semechko
Create an approximately uniform triangular tessellation of a unit sphere

TR=IcosahedronMesh

function TR=IcosahedronMesh
% Name speaks for itself.

% Get the vertex coordinates
t=(1+sqrt(5))/2; % golden ratio
x=[0 1 t];
s=[1 1 1; 1 1 -1; 1 -1 -1; 1 -1 1];
x=repmat(x,[4 1]).*s;
x=[x;circshift(x,[0 -1]);circshift(x,[0 -2])];
x_L2=sqrt(sum(x.^2,2));
x=bsxfun(@rdivide,x,x_L2);

% Triangulate the points
Tri = fliplr(convhulln(x));
TR=TriRep(Tri,x);

Highlights from Uniform Sampling of a Sphere

Highlights from
Uniform Sampling of a Sphere