%Pesso media 500g

matriz500=[5.0000	2.6000	4.0000	4.4000];

%Pesso media 1000g

matriz1000=[28.2000	29.8000	13.2000	4.8000];
%Pesso media 1500g

matriz1500=[42.8000	44.6000	27.0000	15.4000];
 
%Pesso media 2000g

matriz2000=[  62.6000	64.0000	46.8000	30.2000];
 
%Pesso media 2500g

matriz2500=[86.2000	82.6000	64.8000	50.0000];
 
%Pesso media 3000g

matriz3000=[108.8000	102.6000	92.4000	74.8000];

%Pesso media 3500g

matriz3500=[131.2000	129.0000	118.0000	92.8000];

%Pesso media 4000g

matriz4000=[158.2000	143.0000	128.4000	116.0000];

%Pesso media 4500g

matriz4500=[185.6000	158.6000	142.0000	139.6000];

%tratamento de dados
%extendometro 1

extensometro1=[matriz500(1) matriz1000(1) matriz1500(1) matriz2000(1) matriz2500(1) matriz3000(1) matriz3500(1) matriz4000(1) matriz4500(1)
               500          1000          15000         2000          2500          3000          3500          4000          4500]
%  save 'extensometro1.txt'  extensometro1 -ascii ;            
           
extensometro2=[matriz500(2) matriz1000(2) matriz1500(2) matriz2000(2) matriz2500(2) matriz3000(2) matriz3500(2) matriz4000(2) matriz4500(2)
               500          1000          1500          2000          2500          3000          3500          4000          4500]

%  save 'extensometro2.txt'  extensometro2 -ascii ;         

extensometro3=[matriz500(3) matriz1000(3) matriz1500(3) matriz2000(3) matriz2500(3) matriz3000(3) matriz3500(3) matriz4000(3) matriz4500(3)
               500          1000          1500          2000          2500          3000          3500          4000          4500]

%  save 'extensometro3.txt'  extensometro3 -ascii ;            
           
extensometro4=[matriz500(4) matriz1000(4) matriz1500(4) matriz2000(4) matriz2500(4) matriz3000(4) matriz3500(4) matriz4000(4) matriz4500(4)
               500          1000          1500          2000          2500          3000          3500          4000          4500]

%  save 'extensometro4.txt'  extensometro4 -ascii ;           
           
hold on
axis ([0 4500 0 100])
for i=1:9           
plot(extensometro1(2,i),extensometro1(1,i),'b','LineWidth',2)
end