function [x,y,z]=sphere2(r,phi,theta)
% x=(r.*(cos(phi)))'*sin(theta);
% y=(r.*(sin(phi)))'*sin(theta);
% z=(r.*(ones(size(phi))))'*cos(theta);
x=(cos(phi))'*(r.*sin(theta));
y=(sin(phi))'*(r.*sin(theta));
z=(ones(size(phi)))'*(r.*cos(theta));
