How can I write the insructions from this link http://blog.wolframalpha.com/2011/08/25/quaternion-properties-and-interactive-rotations-with-wolframalpha/ in Mathematica to obtain the same result?
Thanks!
How can I write the insructions from this link http://blog.wolframalpha.com/2011/08/25/quaternion-properties-and-interactive-rotations-with-wolframalpha/ in Mathematica to obtain the same result?
Thanks!
To do the calculation without recourse to Wolfram|Alpha you can do
Needs["Quaternions`"]
Quaternion[2, 1, 1, 3] ** Quaternion[2, 1, 1, 0] ** Quaternion[1, 1, 1, 1]
Quaternion[-12, 4, 14, 2]
Or you can do this

WolframAlpha["quaternions: 2-i+j+3k multiplied by 2-i+j+0k multiplied by 1-i+j+k"]
– Bob Hanlon Jun 28 '14 at 15:00