Calibracion De Presion Arterial (Voltios a Mmhg)

Esta es la señal que se obtuvo en el experimento:

Se procedio a recortar en 3 sectores la señal, para que asi el filtrado sea mas facil de ver.

>>presion1sf=sgnl(1000:3000)

>> presion2sf=sgnl(7500:10000)

>> presion3sf=sgnl(12500:13500)

Se procede a filtrar cada uno de los fragmentos de señal, y a visualizar losresultados.

>> [B,A]=butter(2,1/100,'low');
>> presion1f=filter(B,A,presion1sf);
>> plot(presion1f)

>> presion2f=filter(B,A,presion2sf);
>>plot(presion2f)

>> presion3f=filter(B,A,presion3sf);
>> plot(presion3f)

Se recorta la parte inicial de las señales resultantes.

>> presion1f=presion1f(401:2000);>> presion2f=presion2f(401:1500);
>> presion3f=presion3f(401:1000);

Se procede a promediar para averiguar el voltaje promedio que corresponde con la señalobtenida.

presion=presion1f;
i=size(presion);
i=i(1);
suma=0;
for k=1:i
suma=suma+presion(k);
end
presionpr=suma/i

presionpr =

1.3941

presion=presion2f;i=size(presion);
i=i(1);
suma=0;
for k=1:i
suma=suma+presion(k);
end
presionpr=suma/i
presionpr =

1.0531
presion=presion3f;
i=size(presion);
i=i(1);
suma=0;
fork=1:i
suma=suma+presion(k);
end
presionpr=suma/i
presionpr =

0.6934

Finalemente se obtiene un cuadro en donde se ven las relaciones de entre los cmH2O, los mmHgy los voltios, para poder calibrar la señal.

mmHg | cm H2O | Voltios | cmH2O-[V] | mmHg-[V] | [V]-cmH2O | [V]-mmHg |
81 | 112 | 1.3941 | 0.0124 | 0.0172 | 80.3386 | 58.1020|
59 | 82 | 1.0531 | 0.0128 | 0.0178 | 77.8653 | 56.0251 |
37 | 52 | 0.6934 | 0.0133 | 0.0187 | 74.9928 | 53.3603 |
Promedios | 0.0129 | 0.0179 | 77.7322 | 55.8291 |