MathGroup Archive 2005

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

Search the Archive

Re: How to rotate a PolarPlot?


Just use rotation matrix !

For example :

<< "Graphics`Graphics`"

des = PolarPlot[Exp[0.2*t], {t, 0, 8*Pi}, PlotStyle -> Red, PlotRange -> All, 
    AspectRatio -> Automatic, Ticks -> None]; 

Create a rotation function :

rot[draw_, α_] := Show[draw /. {(x_)?NumericQ, y_} -> 
     {{Cos[α], -Sin[α]}, {Sin[α], Cos[α]}} . {x, y}]

Try it :

rot[des, Pi/2];

Regards
 
F.Jaccard


-----Message d'origine-----
De : paul at selfreferral.com [mailto:paul at selfreferral.com] 
Envoyé : mercredi, 15. juin 2005 11:58
� : mathgroup at smc.vnet.net
Objet : [mg57982] How to rotate a PolarPlot?

Hi All,

Would appreciate some help with this. I would like to know how I can
rotate the following plot to an arbitrary angle:

PolarPlot[Exp[.2t], {t, 0, 8p}, PlotStyle -> Red,
  PlotRange -> All, AspectRatio -> Automatic, Ticks -> None]

Thanks
Paul


  • Prev by Date: Re: How to rotate a PolarPlot?
  • Next by Date: Re: plot3D over a triangular domain
  • Previous by thread: Re: How to rotate a PolarPlot?
  • Next by thread: Re: How to rotate a PolarPlot?