a2t.m

来自「Conversion from absorbance to transmitta」· M 代码 · 共 15 行

function ut=a2t(X);
%function ut=a2t(X);
%Conversion from absorbance to transmittance or vice versa
%enodland

[n,m]=size(X);
choice=input(' A2T press 1, T2A press 0: ');
if (choice == 1)
	ut=10.^(-X)*100;
elseif (choice == 0)
	ut=-log10(X./100);
end