t=[],N=0,M=200,draw=a=>{if(!N)for(createCanvas(W=400,W);N<99;)t[N]=[A=random(M),0,f=4*N++,W,sin(f)*A+M,cos(f)*A+M,0];t.find(f=>{t.find(([,,,,a,r])=>{b=1+mag(x=a-f[4],y=r-f[5])**2,f[1]+=x/b,f[6]+=y/b}),stroke(f),circle(f[4]+=f[1]/=3,f[5]+=f[6]/=3,5)})};//#つぶやきProcessing