function Matserial(numero_muestras)

close all;

y=zeros(1,10000);

delete(instrfind({'Port'},{'COM3'}));
puerto_serial=serial('COM3');
puerto_serial.BaudRate=460800;
warning('off','MATLAB:serial:fscanf:unsuccessfulRead');

fopen(puerto_serial); 

figure('Name','Serial communication')
title('SERIAL COMMUNICATION');
xlabel('Número de muestra');
ylabel('G');
grid on;
hold on;

ylim([0 17000]); 
xlim([0 numero_muestras]); 
pause on;
pause(18);
sumando=0;
contador_muestras=1;
while contador_muestras<=numero_muestras
        sumando=fscanf(puerto_serial,'%d');
        disp(sumando);
        y(contador_muestras)=sumando;
        contador_muestras=contador_muestras+1;
end

fclose(puerto_serial); 
delete(puerto_serial);

plot(y);
drawnow
sumando=0;
contador_muestras=1;
while contador_muestras<=numero_muestras
        sumando=sumando+y(contador_muestras);
        contador_muestras=contador_muestras+1;
end

disp(sumando);

end