Matrixfunktion für Drehung um Koordinaten-Achsen xyz
Matrizen für Achsen-Drehungen über die x-,y-,z-Achse
in einer Funktion zusammengefasst
Do(a,X,Y,Z):=Take({{Y cos(a) + Z cos(a) + X, -Z sin(a), Y sin(a)}, {Z sin(a), X cos(a) + Z cos(a) + Y, -X sin(a)}, {-Y sin(a), X sin(a), X cos(a) + Y cos(a) + Z}} ,1,3)
X,Y,Z = 1 für Drehung =-45° um die mit 1 belegte Achse
in homogenen Koordinaten
Rz:=Append(Transpose(Append((Do(θ,0,0,1)),{0,0,0})),{0,0,0,1})
---
Userdefined Functions zu Matrizen funktionieren nicht direkt - die Vorschaltung von TAKE erzeugt dann (meist) doch eine parameterabhängige Matrix!
X,Y,Z = 1 für Drehung =-45° um die mit 1 belegte Achse
in homogenen Koordinaten
Rz:=Append(Transpose(Append((Do(θ,0,0,1)),{0,0,0})),{0,0,0,1})
---
Userdefined Functions zu Matrizen funktionieren nicht direkt - die Vorschaltung von TAKE erzeugt dann (meist) doch eine parameterabhängige Matrix!