|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
下面是我编写的程序,感觉是根据理论进行的,但是只能得到k1,k2,无法算出k3,k4。请大家帮忙看看呀。
function sys=chenben(u)
beta=1.554;namda=0.131;gama=0.000652;
syms x y x1 x2 x3 f1 f2 f3 f4 f2_1 f2_2 f3_1 f3_2 f3_3 f4_1 f4_2 f4_3 f4_4 K K1 K2 K3 K31 K4 KK Hx Hy
% tao=68.5+1.16929*x
tao=25;
% F=1-exp((-(namda*(tao^(-gama))*x)))^beta);
Hy=namda*(50^(-gama))*beta*(namda*(50^(-gama))*y)^(beta-1)*exp((-(namda*(50^(-gama))*y)^beta))
Hx=namda*(50^(-gama))*beta*(namda*(50^(-gama))*x)^(beta-1)*exp((-(namda*(50^(-gama))*x)^beta))
f1=namda*(tao^(-gama))*beta*(namda*(tao^(-gama))*(y-x))^(beta-1)*exp((-(namda*(tao^(-gama))*(y-x))^beta))
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
f2_1=namda*(tao^(-gama))*beta*(namda*(tao^(-gama))*(x1-x))^(beta-1)*exp((-(namda*(tao^(-gama))*(x1-x))^beta))
f2_2=namda*(tao^(-gama))*beta*(namda*(tao^(-gama))*(y-x1))^(beta-1)*exp((-(namda*(tao^(-gama))*(y-x1))^beta))
f2=f2_1*f2_2
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
f3_1=namda*(tao^(-gama))*beta*(namda*(tao^(-gama))*(x1-x))^(beta-1)*exp((-(namda*(tao^(-gama))*(x1-x))^beta))
f3_2=namda*(tao^(-gama))*beta*(namda*(tao^(-gama))*(x2-x1))^(beta-1)*exp((-(namda*(tao^(-gama))*(x2-x1))^beta))
f3_3=namda*(tao^(-gama))*beta*(namda*(tao^(-gama))*(y-x2))^(beta-1)*exp((-(namda*(tao^(-gama))*(y-x2))^beta))
f3=f3_1*f3_2*f3_3
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
f4_1=namda*(tao^(-gama))*beta*(namda*(tao^(-gama))*(x1-x))^(beta-1)*exp((-(namda*(tao^(-gama))*(x1-x))^beta))
f4_2=namda*(tao^(-gama))*beta*(namda*(tao^(-gama))*(x2-x1))^(beta-1)*exp((-(namda*(tao^(-gama))*(x2-x1))^beta))
f4_3=namda*(tao^(-gama))*beta*(namda*(tao^(-gama))*(x3-x2))^(beta-1)*exp((-(namda*(tao^(-gama))*(x3-x2))^beta))
f4_4=namda*(tao^(-gama))*beta*(namda*(tao^(-gama))*(y-x3))^(beta-1)*exp((-(namda*(tao^(-gama))*(y-x3))^beta))
f4=f4_1*f4_2*f4_3*f4_4
K1=f1
K2=int(f2,x1,x,y)
K3=int(int(f3,x2,x,x1),x1,x,y)
K4=int(int(int(f4,x3,x,x2),x2,x,x1),x1,x,y)
K=(K1+K2+K3+K4)*Hx
KK=int(K,x,0,y)
y=0.15
sys=vpa(Hy+KK) |
|