MathGroup Archive 2006

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

Search the Archive

Re: Beginner--[Plz Help] I don't want to display a POLARPLOT but use SHOW Command


You could try

Quit

<< "Graphics`Graphics`"

Block[{$DisplayFunction = Identity}, pp = PolarPlot[Cos[t], {t,
-(Pi/2), Pi/2}, PlotStyle -> Hue[0.4]];
   pm = PolarPlot[Sin[t], {t, -(Pi/2), Pi/2}, PlotStyle -> Hue[0.6]]; ]

Show[pp,pm,AxesLabel\[Rule]{TraditionalForm[t],TraditionalForm[f[t]]},

Epilog\[Rule]{Text[TraditionalForm[HoldForm[f[t]=Cos[t]]],{0.65,0.95}],

Text[TraditionalForm[HoldForm[f[t]=Sin[t]]],{0.65,0.85}],{Hue[0.4],
          Line[{{0.85,0.95},{0.95,0.95}}]},{Hue[0.6],
          Line[{{0.85,0.85},{0.95,0.85}}]}},ImageSize\[Rule]400];

(*plot to be displayed*)

Dimitris Anagnostou


  • Prev by Date: Re: How do you open all cells?
  • Next by Date: RE: sample programs
  • Previous by thread: Beginner--[Plz Help] I don't want to display a POLARPLOT but use SHOW Command
  • Next by thread: Re: Beginner--[Plz Help] I don't want to display a POLARPLOT but use SHOW Command