%Streckung
%File: Strecken.m

clear;
clf;


% Objekt erzeugen
 object = [1,2,2,1,1;1,1,2,2,1];           % Rechteck  
 
 
 Streckfaktor = [2 0;0 2];
 
 
 neu = Streckfaktor*object;
 
hold;
plot (object(1,:),object(2,:));

plot (neu(1,:),neu(2,:));