%MATLAB APLICADO A ROBOTICA Y MECATRONICA
%FERNANDO REYES CORTES
%EDITORIAL ALFAOMEGA


clc
clear all
close all

x=[1; -0.888; 4.35;  3; 4];

norma_x=sqrt(x'*x);

[m n]=size(x);

normab_x=0;
for i=1:m
   normab_x=normab_x+x(i)*x(i);    
end
normab_x=sqrt(normab_x);
normac_x=sqrt(x(1)^2+x(2)^2+x(3)^2+x(4)^2+x(5)^2);

normad_x=norm(x,2);

[norma_x  normab_x   normac_x normad_x]


y=[4; 6; 5.67; -0.90];
norma_y=sqrt(y'*y);

[m n]=size(y);

normab_y=0;
for i=1:m
   normab_y=normab_y+y(i)*y(i);    
end
normab_y=sqrt(normab_y);
normac_y=sqrt(y(1)^2+y(2)^2+y(3)^2+y(4)^2);

normad_y=norm(y,2);

[norma_y  normab_y   normac_y normad_y]



z=[0.001; 4; 7; -12.333; 3/4];
norma_z=sqrt(z'*z);

[m n]=size(z);

normab_z=0;
for i=1:m
   normab_z=normab_z+z(i)*z(i);    
end
normab_z=sqrt(normab_z);
normac_z=sqrt(z(1)^2+z(2)^2+z(3)^2+z(4)^2+z(5)^2);

normad_z=norm(z,2);

[norma_z  normab_z   normac_z normad_z]