%
% spears
%
P = imread('cameraman.tif');        % read the image
[m,n] = size(P);                    % record its size
SP = 100*ones(m,1*m+n,'uint8');     % create a white canvas
for i=1:m                           % inspect every pixel
for j=1:n,	                    % of the original image
    SP(i,1*m+j-1*i) = P(i,j);       % and shear it with the matrix A
end
end
imshow([P SP])                      % display both images
