Author 
Comment/Response 
Bill

06/28/07 00:42am
Hi :
I want to rotate a parametric set of equations that represent a torus at standard position by 30 degrees about the x axis. I'm looking for the parametric set of equations that represent the torus after the rotation that I've just described. Below is the Mathematica 6.0 syntax that I'm using. It isn't working. Could someone please tell me what I'm doing wrong.
Note: the torus equation at standard position, before rotation is: 4 Cos[t]  Sin[s] Cos[t], 4 Sin[t]  Sin[s] Sin[t], Cos[s].
My Mathematica 6.0 code below that I tried:
torus = {4 Cos[t]  Sin[s] Cos[t], 4 Sin[t]  Sin[s] Sin[t], Cos[s]};
rx30 = RotationMatrix[30 Degree, {1, 0, 0}] // MatrixForm;
rx30.torus
After evaluation of the above code, it just basically returns the last line above. It doesn' t give me the new equation after the 30 degree rotation. Could someone please give me the correct code for doing this?
Thanks,
Bill
URL: , 
