Question

Write a MATLAB code that can convert a vector in any coordinate system to the other two coordinate
systems. The code must ask the use to select in which coordinate system is the entered data.

Write a MATLAB code that can convert a vector in any coordinate system (Cartesian, cylindrical or spherical) to the other two coordinate
systems. The code must ask the use to select in which coordinate system is the entered data.

Answer 1

clc;
clear all;
a=1;
while (a==1)
fprintf('Select the co-ordinate system in which you wish to enter the coordinates\n');
opt=input('Press 1 for catersian co-ordinate system or press 2 for cylindrical coordinate system or press 3 for spherical coordiante system: ');
if (opt==1)
x=input('\n Enter the x coordinate: ');
y=input('\n Enter the y coordinate: ');
z=input('\n Enter the z coordinate: ');
rho=sqrt(x^2+y^2);
if (x==0 && y==0)
phi=0;
elseif (x>=0)
phi=asind(y/rho);
elseif (x>0)
phi=atand(y/x);
elseif (x<0)
phi=-asind(y/rho)+pi;
else
end
  
fprintf ('\n The coordinates in the cylindrical coordinate system: (%f,%f,%f)',rho,phi,z);
r=sqrt(x^2+y^2+z^2);
theta=acosd(z/r);
phi=atand(y/x);
  
fprintf('\n The coordinates in the spherical coordinate system: (%f,%f,%f)',r,theta,phi);
a=input('\n Press 1 to continue or 2 to quit: ');

elseif (opt==2)
rho=input('\n Enter the rho coordinate: ');
phi=input('\n Enter the phi coordinate (in degrees): ');
z=input('\n Enter the z coordinate: ');
x=phi*cosd(phi);
y=phi*sind(phi);
z=z;
  
fprintf ('\n The coordinates in the cartesian coordinate system: (%f,%f,%f)',x,y,z);
  
r=sqrt(x^2+y^2+z^2);
theta=acosd(z/r);
phi=atand(y/x);
  
fprintf('\n The coordinates in the spherical coordinate system: (%f,%f,%f)',r,theta,phi);
a=input('\n Press 1 to continue or 2 to quit: ');

elseif (opt==3)
r=input('\n Enter the r coordinate: ');
phi=input('\n Enter the phi coordinate (in degrees): ');
theta=input('\n Enter the theta coordinate (in degrees): ');
  
x=r*sind(theta)*cosd(phi);
y=r*sind(theta)*sind(phi);
z=r*cosd(theta);
  
fprintf ('\n The coordinates in the cartesian coordinate system: (%f,%f,%f)',x,y,z);
  
r=sqrt(x^2+y^2+z^2);
theta=acosd(z/r);
phi=atand(y/x);
  
fprintf('\n The coordinates in the spherical coordinate system: (%f,%f,%f)',r,theta,phi);
a=input('\n Press 1 to continue or 2 to quit: ');
  
else
warning('Invalid input');
a=input('\n Press 1 to continue or 2 to quit: ');
end
end