Цветы из Mathlab
Цветы из Mathlab
n=800; p=pi; [R,T]=ndgrid(linspace(0,1,n),linspace(-2,20p,n)); x=1-(.5)((5/4)(1-mod(3.6T,2p)/p).^2-.25).^2; U=2exp(-T/(8p)); L=sin(U); J=cos(U); y=1.99(R.^2).(1.2R-1).^2.L; K=x.(R.*L+y.*J); X=K.*sin(T); Y=K.cos(T); Z=x.(R.*J-y.*L); surf(X,Y,Z,‘LineStyle’,’none’) grid,axis off; colormap(jet)