Nuclear explosion

Daniel Pereira
on 27 Oct 2021
- 5
- 74
- 0
- 0
- 179
r=meshgrid(0:.1:25);
t=r'*pi/25-pi/2;
P=(6-r).*r.*exp(-r/3).*cos(t);
x=r.*cos(t);
y=r.*sin(t);
contourf(y,x,abs(P),1e3,'edgec','n');
colormap hot;
caxis([0 1]);
axis equal off;
set(gcf,'color','k');