Modulating the radius with respect to phi

This sphere has its radius modulated with a sine term in phi:

> plot3d(1+sin(9*phi)/5,theta=0..2*Pi,phi=0..Pi,coords=spherical,scaling=constrained,axes=frame,grid=[50,50]);

[Maple Plot]

>