clc;
clear;
I_0R=0.4271,I_0G=0.45155,I_0B=0.44314;
I_LR=0.32039,I_LG=0.33621,I_LB=0.52769;
L=0.0012;
I_JR=0.295133333;
I_JG=0.307977778;
I_JB=0.528953333;
I_1=[0.45255,0.320537778,0.140444444,];
I_2=[0.467288889,0.352293333,0.156994444];
I_3=[0.48495,0.357908889,0.160265556];
I_LR=0.307292222;
I_LG=0.292676667;
I_LB=0.450833333;
I_R=I_1(:,1)*0.8*0.05+I_2(:,1)*0.4*1+I_3(:,1)*0.2*0.78;
I_G=I_1(:,2)*0.8*0.829+I_2(:,2)*0.4*0.531+I_3(:,2)*0.2*0.347;
I_B=I_1(:,3)*0.8*0.47+I_2(:,3)*0.4*0.046+I_3(:,3)*0.2*0.104;
%方程如下
[c1,c2,c3,c4]=solve(...
'I_R=I1*exp(-(c1*412.9+c2*412.9+c3*0.1307+c4*0.001834)*L)*0.05+I2*exp(-(c1*94.724+c2*59.146+c3*0.00838+c4*0.00649)