Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2005

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

Search the Archive

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?