>>854
数理を理解できないままにグラフ化すると

plot(θ,φ*cos(θ),bty='n',pch='.',xlab='θ(北極点からのラジアン)' ,,ylab='φ(経度)*cos(θ)')

https://i.imgur.com/R8TFUG3.png

理解が足りないので断念。