帮我用MATLAB写一段代码，代码主要作用是：根据HITRAN数据库中下载到的标准状态下的二氧化碳吸收线强，基于逐线积分方法计算任意温度压力下的二氧化碳吸收系数

% 读取HITRAN数据库中的二氧化碳吸收线强
data = load('CO2_HITRAN.txt');
nu = data(:,1); % 波数
S = data(:,2); % 吸收线强

% 输入温度和压力
T = input('请输入温度：');
P = input('请输入压力：');

% 计算分子数密度和气体压强
N = P/(1.3806503e-23*T); % 分子数密度
p_g = P/101325; % 气体压强

% 计算吸收系数
kappa = 0;
for i = 1:length(nu)
% 计算吸收线强度
Q = S(i)*(296/T)*(p_g/0.997)*(nu(i)/296)^2*exp(1.4388e4/T*(1/296-1/nu(i)));

% 计算逐线积分
x = nu(i)*(1/(1.3806503e-23*T));
kappa = kappa + Q*x^2/(exp(x)-1);
end
kappa = 1.3806503e-23*N*kappa;

disp(['二氧化碳的吸收系数为：' num2str(kappa) ' m^2/mol']);