展开全部
He是常数吗如果是的话我的方法如下(因为没有具体数据,我就随便给了一下K、T和He的参数,你可以根据实际情况修改)。
主程序
clc;clear
K = [1;2;3;4];
T = [1;4;2;3];
He = 1;
Ct0 = rand(numel(K)+1,1);
options = optimset('TolFun',1e-16); % 精度要求
Ct = fsolve(@(Ct)eqs(Ct,K,T,He),Ct0,options);
C = Ct(1:end-1,1)
tmin = Ct(end,1)
函数程序
function F = eqs(Ct,K,T,He)
Ct = reshape(Ct,numel(Ct),1);
K = reshape(K,numel(K),1);
T = reshape(T,numel(T),1);
n = numel(K);
F = zeros(n+1,1);
F(1:n,1) = K.*(1-T/Ct(n+1,1).*(1-exp(-Ct(n+1,1)./T))) - Ct(1:n,1);
F(n+1,1) = 2*He/sum(Ct(1:n,1)) - Ct(n+1,1);
end
计算结果
C =
0.3803
0.2405
0.6647
0.6237
tmin =
1.0476
主程序
clc;clear
K = [1;2;3;4];
T = [1;4;2;3];
He = 1;
Ct0 = rand(numel(K)+1,1);
options = optimset('TolFun',1e-16); % 精度要求
Ct = fsolve(@(Ct)eqs(Ct,K,T,He),Ct0,options);
C = Ct(1:end-1,1)
tmin = Ct(end,1)
函数程序
function F = eqs(Ct,K,T,He)
Ct = reshape(Ct,numel(Ct),1);
K = reshape(K,numel(K),1);
T = reshape(T,numel(T),1);
n = numel(K);
F = zeros(n+1,1);
F(1:n,1) = K.*(1-T/Ct(n+1,1).*(1-exp(-Ct(n+1,1)./T))) - Ct(1:n,1);
F(n+1,1) = 2*He/sum(Ct(1:n,1)) - Ct(n+1,1);
end
计算结果
C =
0.3803
0.2405
0.6647
0.6237
tmin =
1.0476
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
东莞大凡
2024-11-14 广告
2024-11-14 广告
标定板认准大凡光学科技,专业生产研发厂家,专业从事光学影像测量仪,光学投影测量仪.光学三维测量仪,光学二维测量仪,光学二维测量仪,光学三维测量仪,光学二维测量仪.的研发生产销售。东莞市大凡光学科技有限公司创立于 2018 年,公司总部坐落于...
点击进入详情页
本回答由东莞大凡提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询