Assign colors to number and letters
0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

Constructs -

0 & 1 "Binary". Black and white. Dark and light. Off and on.

[Dark] and [Light]

"RGB". Typical system used to code color. 3 element [R,G,B] vector of 0-255, [0 0 1] = [0 0 255]
4, 3, 2

"7". Line dividing the orthogonal blue and red axes

"8". Loop or circuit. Consider a Möbius strip

"Spinning 6's into 9's". Or M's into W's or W's into M's. Spinning an event to gain or lose.
6 + 3 = 9

* ~ * ~ *
Color Cube Code

x =[
     NaN 0 1 NaN
       0 0 1 1
       0 0 1 1
     NaN 0 1 NaN
     NaN 0 1 NaN
     NaN NaN NaN NaN
     ];
y =[
     NaN 0 0 NaN
       0 0 0 0
       1 1 1 1
     NaN 1 1 NaN
     NaN 0 0 NaN
     NaN NaN NaN NaN
     ];
z =[
     NaN 0 0 NaN
       0 1 1 0
       0 1 1 0
     NaN 0 0 NaN
     NaN 0 0 NaN
     NaN NaN NaN NaN
     ];

cc=zeros(8,3);
cc(1,:)=[0 0 0]; % black
cc(2,:)=[1 0 0]; % red
cc(3,:)=[0 1 0]; % green
cc(4,:)=[0 0 1]; % blue
cc(5,:)=[1 0 1]; % magenta
cc(6,:)=[0 1 1]; % cyan
cc(7,:)=[1 1 0]; % yellow
cc(8,:)=[1 1 1]; % white
c=repmat(zeros(size(x)),[1 1 3]);
     
for i=1:size(cc,1)
    ix=find(x==cc(i,1) &...
            y==cc(i,2) &...
            z==cc(i,3));
    [ir,ic]=ind2sub(size(x),ix);
    for k=1:3
        for m=1:length(ir)
            c(ir(m),ic(m),k)=cc(i,k);
        end
    end
end

s=surf(x,y,z,c);
shading interp;
title('RGB Color Cube');
xlabel('Red');
ylabel('Green');
zlabel('Blue');
axis equal;
view(135,45)
set(gcf,'color','w')

Origin

Back to home