MathGroup Archive 2005

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

Search the Archive

Re: gradient in ParametricPlot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg59390] Re: [mg59372] gradient in ParametricPlot
  • From: Bob Hanlon <hanlonr at cox.net>
  • Date: Mon, 8 Aug 2005 03:34:36 -0400 (EDT)
  • Reply-to: hanlonr at cox.net
  • Sender: owner-wri-mathgroup at wolfram.com

Needs["Graphics`"];

With[{n=20}, 
    DisplayTogether[
      Table[
        ParametricPlot[{Cos[5*t],Sin[3*t]},
          {t,(k-1)*2Pi/n,k*2Pi/n},
          PlotStyle->Hue[k/n],
          AspectRatio->Automatic],
        {k,n}]]];


Bob Hanlon

> 
> From: Daniele Lupo <danwolf80_no_spam_please_ at libero.it>
To: mathgroup at smc.vnet.net
> Date: 2005/08/07 Sun AM 03:47:03 EDT
> Subject: [mg59390] [mg59372] gradient in ParametricPlot
> 
> Hi.
> 
> I'd like to plot a ParametricPlot graphic image. It's easy, but I'd like
> also to color the curve obtained according to a gradient (Hue, for
> example), so the line changes color according the parameter value. In this
> case if the coordinates are {t Sin[t], t Cos[t]} the point at t=value will
> be colored as Hue[value]. There's a way to do this, instead to have a line
> with a costant color defined by StylePlot?
> 
> I've obtained this in a ParametricPlot3D, using
> {x[u,v],y[u,v],z[u,v],{SurfaceColor[Hue[f[u,v]]]}} (thanks to Davin Park
> example in a my previous post about ellipsoid), but this does not works in
> 2D case (there's no surfaces...)
> 
> Thanks for answers
> 
> Daniele
> 
> 


  • Prev by Date: Re: coefficient of a polynomial term
  • Next by Date: Re: Re: Some bugs in Mathematica - Documentation
  • Previous by thread: Re: gradient in ParametricPlot
  • Next by thread: Re: gradient in ParametricPlot