function T = pt100(R)

pt100 = @(R) (R/100.-1)/0.003850+273.15;

T = pt100(R);