Plot[ZernikeR[7,3,r],{r,0,1}]