• Remix
  • Share
  • New Entry

on 24 Oct 2021
  • 39
  • 19
  • 0
  • 0
  • 265
% The Fourier spectrum of a circle on the MATLAB logo
% By Victoria A. Sablina
N=4096;
a=N/512;
f=zeros(N);
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);
L=membrane(1,2048);
surf(L,S/max(S(:))*255,'EdgeColor','none');
view(-90,5);
axis off;
title('MATLAB Central 20^{th} anniversary!!!');
Remix Tree
Load full remix tree