2
$\begingroup$

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!

$\endgroup$
  • $\begingroup$ You might have a look here: link $\endgroup$ – eldo Jun 28 '14 at 14:58
  • 1
    $\begingroup$ To comply with StackExchange policy, please make the question self-contained. Do not just post a link, explain clearly what you need. $\endgroup$ – Szabolcs Jun 28 '14 at 14:59
  • 1
    $\begingroup$ WolframAlpha["quaternion: 2-i+j+3k"] WolframAlpha["quaternions: 2-i+j+3k multiplied by 2-i+j+0k multiplied by 1-i+j+k"] $\endgroup$ – Bob Hanlon Jun 28 '14 at 15:00
5
$\begingroup$

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

quaternions

| improve this answer | |
$\endgroup$

Not the answer you're looking for? Browse other questions tagged or ask your own question.