• Remix
  • Share
  • New Entry

  • Victoria

  • /
  • Sun Reflection in the Limpid Water

on 10 Oct 2021
  • 54
  • 75
  • 1
  • 0
  • 219
% The Fourier spectrum of a circle
% By Victoria A. Sablina
N=4096;
a=N/512;
f=zeros(N);
F=f;
for x=1:N
for y=1:N
if (x-a)^2+(y-a)^2<a^2
f(x,y)=255;
end
end
end
[x,y]=meshgrid(1:N,1:N);
g=(f.*(-1).^(x+y));
F=fft2(g);
S=abs(F);
image(S/max(S(:))*255);
axis off;
title('MATLAB Central 20^{th} anniversary!!!');
Remix Tree