createCanvas(350,250)

stroke(127);

d=Array(160).fill(100)

R=3.14/180

for(Y=-180;Y<181;Y+=6){for(X=-180;X<181;X+=4){

r=R*sqrt(X*X+Y*Y)

Z=100*cos(r)-30*cos(3*r)

x=~~(80+X/3-Y/6)

y=~~(40-Y/6-Z/4)

if(x<0|x>160|d[x]<y)continue

point(x*2,y*2)

d[x]=y

}}}//#つぶやきprocessing