Re: Line bzw. Point im Epilog von ParametricPlot3D

[Jens-Peer Kuska <kuska@XXXXXXX.de>]

Hallo,

weil Epilog/Prolog nur 2d Primitive enthalten darf,
von 3d zu 2d ben"otigt man eine Projektion und die
wird f"ur den Epilog/Prolog nicht gemacht. 
Man muss also 2 Graphiken erstellen und kombinieren

Block[{$DisplayFunction = Identity},
    gr1 = Graphics3D[{RGBColor[1, 0, 0], Line[{{-1, -1, -1}, {1, 1,
1}}]}];
    gr2 = ParametricPlot3D[{Cos[5t], Sin[3t], Sin[t]}, {t, 0, 2\[Pi]}];
    ];
Show[gr2, gr1];


In deisem Fall ist die parametrische Form der zweiten
Kurve recht einfach und man kann auch

ParametricPlot3D[Evaluate[{{Cos[5t], Sin[3t], Sin[t]},
      Append[{-1, -1, -1}*(1 - t/(2Pi)) + t*{1, 1, 1}/(2Pi), 
        RGBColor[1, 0, 0]]}], {t, 0, 2\[Pi]}]

probieren. 



"Schlosser Reinhard, Prof. Dr." wrote:
> 
> Hallo,
> 
> erst mal vielen Dank für alle bisherigen Tips,
> zu jeder meiner Fragen habe ich stets wenigstens eine leicht umsetzbare
> Antwort erhalten.
> 
> Ich würde gerne in den unten stehenden ParametricPlot3D eine Raumdiagonale
> einzeichnen.
> Warum kann ich im Epilog Line oder Point nicht einfach so verwenden?
> 
> ParametricPlot3D[{Cos[5t],Sin[3t],Sin[t]},{t,0,2\[Pi]},
>   Epilog\[Rule]{Line[{{-1,-1,-1},{1,1,1}}]}]
> 
> Mit freundlichen Gruessen / Best Regards
> Prof. Dr.-Ing. Reinhard Schlosser
> 
> Fachhochschule Deggendorf
> Fachbereich Elektrotechnik und Medientechnik
> Edlmairstrasse 6 + 8
> 94469 Deggendorf
> Tel 0991-3615-515
> Fax 0991-3615-599
> reinhard.schlosser@XXXXXXX.de
> http://www.fh-deggendorf.de