MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: no line PlotStyles with ParametricPlot3D ?


Hi,

xyz = {Cos[t] Cosh[t], t + Tanh[t], Sin[t]Cosh[t]};
ParametricPlot3D[Evaluate[Append[xyz,{RGBColor[1, 0, 0], Thickness[.01]} ]], 
{t, 0, 2 Pi} ];

Regards
  Jens

"Narasimham G.L." <mathma18 at hotmail.com> schrieb im Newsbeitrag 
news:ck33sp$b0t$1 at smc.vnet.net...
> << Graphics`Graphics3D`;
> xyz = {Cos[t] Cosh[t], t + Tanh[t], Sin[t]Cosh[t]};
> ParametricPlot3D[xyz, {t, 0, 2 Pi} ];
> xyzT = Table[ xyz, {t, 0, 2 Pi,Pi/30}];
> ScatterPlot3D[xyzT, PlotJoined -> True,
>    PlotStyle -> {RGBColor[1, 0, 0], Thickness[.01]} ];
> "PlotStyles of 3D space curve not possible except by using  ScatterPlot?"
> 



  • Prev by Date: Occurrence of a substring inside a list of strings
  • Next by Date: Constraints to parameters in FindFit?
  • Previous by thread: no line PlotStyles with ParametricPlot3D ?
  • Next by thread: Re: no line PlotStyles with ParametricPlot3D ?