这个曲线的极坐标方程(ρ=csc(nθ))也来自教材,因其时不时形似太阳,所以给其取名“太阳线”。
动态图更好玩:
代码:
Manipulate[
PolarPlot[Sec[n x], {x, -10, 10},
PlotLabel -> "ρ=Csc(nθ)(太阳线)"], {n, -10, 30}]
Manipulate[
PolarPlot[Sec[n x], {x, -10, 10},
PlotLabel -> "ρ=Csc(nθ)(太阳线)"], {n, -10, 30}]