#
# Maple-Beispielscript (Maple 10)
#
# Thema: Raumkurven anzeigen
#
# www.jb-electronics.de
#
#
# Neu starten und Plot- und LinearAlgebra-Paket einbinden
restart;
with (plots);
with (LinearAlgebra);
# Funktion definieren
r := t -> exp(-0.1 * t) * Vector([sin(2 * Pi * t), cos(2 * Pi * t), 2 * t])
# Plot erstellen
spacecurve(r(t), t=0..50, numpoints=10000, axes=boxed);