The end of the rainbow

on 15 Oct 2021

%Altered to hopefully make it more realistic by putting the rainbow in

%front of the clouds

a=508;

j=@cart2pol;

X=-89:.349:88;

[t,r]=j(X+160,X'-130);

[t,d]=j(X,X');

c=turbo;

b=bone;

f=cool;

colormap([b(60:255,:);flip(f(100:20:185,:)).*b(200:204,:);c(40:11:255,:);b(1:end,:)]);

image(rescale(abs(ifft2(d.^-1.7.*cos(6*rand(a)))),80,195));

hold

Current plot held

image(r,'AlphaData',.25);

axis([0 508 200 508],'off');