Interpola

Aquí dejo una nueva función para la hója de cálculo de openoffice, que permite interpolar entre dos parejas de números, con la idea de facilitar el trabajo.

[vb]

Function interpola(x1 as double,y1 as double,x2 as double, y2 as double, x as double)as double

dim a as double
dim b as double

if x1=x2 then

interpola=(y1+y2)/2

else

b=(y1-y2)/(x1-x2)

a=(x1*y2-y1*x2)/(x1-x2)

interpola=a+b*x

end if

end function

[/vb]

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *