when I set plot range on 300, polar coordinates as is shown in figure 1 is completely covered but figure range is so far away from outer degree circle and When I set plot range on 200, polar coordinate is not shown in plot clearly,I am thankful if you guide me to fix it
Q = PolarPlot[
{(100*Cos[t]*Cos[t])/(1.5*(1-0.49)^(1/2)),
(100*Sin[t]*Sin[t])/(1.5*(2-0.49)*(1 - 0.49)^(3/2))},
{t, 0, 2*Pi},
PolarAxes -> True,
PlotRange -> 300,
PolarGridLines -> {Automatic, None},
PolarTicks -> {"Degrees", Automatic}
]
PlotRange -> 200
, use the optionPlotRangePadding -> 25
$\endgroup$PolarPlot[170, {\[Theta], 0, 2 Pi}, PlotStyle -> {Directive[Opacity[0]]}]
and then combine that withShow
with yourpolarplot
. $\endgroup$