Code: Select all
Code, edit and compile here:
\documentclass[border=5mm]{article}\usepackage{pgfplots}\pgfplotsset{compat=1.18}\usepgfplotslibrary{fillbetween}\usetikzlibrary{backgrounds,arrows.meta}\pgfplotsset{interpret as polar/.style={x filter/.code=\pgfmathparse{cos(rawx)*rawy},y filter/.code=\pgfmathparse{sin(rawx)*rawy}}}\begin{document}\begin{tikzpicture}[>=Triangle]\begin{axis}[xtick distance=2,ytick distance=2,axis lines=center,axis equal image,enlargelimits=true,]\addplot[name path=A,very thick,domain=0:360,samples=100,smooth,interpret as polar](x,{1+sin(x)});\addplot[name path=B,very thick,domain=0:360,samples=100,smooth,interpret as polar](x,{3*sin(x)});\path[name path=xaxis] (axis cs: -1,0) -- (axis cs:1,0);\addplot[blue,opacity=0.5] fill between[of=B and A];\node[anchor=center,label=north west:\(R\)] at (0,0){};\addplot[white] fill between[of=A and xaxis];\end{axis}