PolarPlot[Sec[t-(2*Pi)/(5/2)*Round[((5/2)*t)/(2*Pi)]],{t,0,2*2*Pi}]