Small Satellites

Home » Fractals » Box Fractals

Box Fractals

clc; clear all; close all;

a = 1;
figure('Position',[0 0 800 800])
for i = 1 :5
   [n m] = size(a);
    Z = zeros(n,m);
    a = [a,Z,a;
         a,a,a;
         a,Z,a
         ];
end
imagesc(a);
colormap bone;axis off;
caxis([0, 1]);

CubeFractals

clc; clear all;
a = 1;
figure('Position',[0 0 800 800])
for i = 1 :5
   [n m] = size(a);
    Z= zeros(n,m);
    a = [Z,a,Z;
         a,a,a;
         Z,a,Z
         ];
end
imagesc(a);
colormap bone;axis off;
caxis([0, 1]);

CubeFractals_02

clc; clear all;
a = 1;
figure('Position',[0 0 800 800])
for i = 1 :5
   [n m] = size(a);
    Z= zeros(n,m);
    a = [a,a,a;
         a,Z,a;
         a,a,a
         ];
end
imagesc(a);
colormap bone;axis off;
caxis([0, 1]);

CubeFractals

clc; clear all;
a = 1;
figure('Position',[0 0 800 800])
for i = 1 :5
   [n m] = size(a);
    Z= zeros(n,m);
    a = [a,Z,a;
         Z,a,Z;
         a,Z,a
         ];
end
imagesc(a);
colormap bone;axis off;
caxis([0, 1]);

CubeFractals_04
clc; clear all;
a = 1;
figure('Position',[0 0 800 800])
for i = 1 :5
   [n m] = size(a);
    Z= zeros(n,m);
    if mod(i,2) == 0
    a = [Z,a,a;
         a,a,a;
         a,a,a
         ];
    else
          a = [a,a,a;
               a,Z,a;
               a,a,a
             ];
    end
end
imagesc(a);
colormap bone;axis off;
caxis([0, 1]);

 

 

Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

Recent Post

%d bloggers like this: