Re: How to rotate a PolarPlot?

• To: mathgroup at smc.vnet.net
• Subject: [mg57987] Re: [mg57982] How to rotate a PolarPlot?
• From: "Jaccard Florian" <Florian.Jaccard at he-arc.ch>
• Date: Thu, 16 Jun 2005 05:35:44 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```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?