feynmania
x=[1790:10:2000];
y=[3.9 5.3 7.2 9.6 12.9 17.1 23.2 31.4 38.6 50.2 62.9 76.0 92.0 106.5 123.2 131.7 150.7 179.3 204.0 226.5 251.4 281.4];
x=x\';y=y\';                  % 将原始数据转换为列向量
st_ = [500 20 0.2];         % xm,b,r 设定初始值
ft_ = fittype(\'xm/(1+b*exp(-r*(x-1790)))\',\'dependent\',{\'y\'},\'independent\',{\'x\'},\'coefficients\',{\'xm\', \'b\', \'r\'});
cf_ = fit(x,y,ft_ ,\'Startpoint\',st_)
% 模型输出的拟合参数
xm = 446.6;    % 拟合出的最大人口数量xm
b = 57.01;     % b=xm/x0;
r = 0.02155;   % 拟合出的人口增长率r
% 画图       
scatter(x,y);  % 散点图
hold on;
x1=[1790:10:2300];  % 检验查看拟合曲线是否为S型曲线
cf_ = xm./(1+b*exp(-r*(x1-1790)));
plot(x1,cf_);
grid

 

%例子1:正规战争(课本p150)
%模型类型:一阶微分方程组
%数值解法:RK4:ode45()
%% f1.m
function dz=f(t,z)   %z=[x,y]
a=0.5;  %甲方战斗系数
b=0.5;  %乙方战斗系数
dz(1)=-a*z(2);
dz(2)=-b*z(1);
dz=dz(:);
end
%% lizi1.m
x0=[1:1:10];   %甲方兵力变化
y0=[10:-1:1];  %乙方兵力变化
for i=1:10
    [t,z]=ode45(@f,[0:0.02:2],[x0(i),y0(i)])
    k(i)=0.5*y0(i)^2-0.5*x0(i)^2;  %a=0.5,b=0.5,计算k
    plot(z(:,1),z(:,2));
    axis([0,10,0,10]);
    hold on
End

%模型:混合战争:甲方游击部队,乙方正规部队(课本p152)
%模型类型:一阶微分方程组
%数值解法:RK4:ode45()
function dz=f(t,z)   %z=[x,y]
c=0.5;  %甲方战斗系数
d=0.5;  %乙方战斗系数
dz(1)=-c*z(1)*z(2);
dz(2)=-d*z(1);
dz=dz(:);
end

%%混合战争模型
%f2.m
function dz=f2(t,z)   %z=[x,y]
c=0.5;  %甲方战斗系数
d=0.5;  %乙方战斗系数
dz(1)=-c*z(1)*z(2);
dz(2)=-d*z(1);
dz=dz(:);
End

%Lizi2.m
x0=[1:1:10];   %甲方兵力变化
y0=[10:-1:1];  %乙方兵力变化
for i=1:10
    [t,z]=ode45(@f1,[0:0.02:2],[x0(i),y0(i)])
    n(i)=0.5*y0(i)^2-2*0.5*x0(i);  %c=0.5,d=0.5,计算n
    plot(z(:,1),z(:,2));
    axis([0,11,0,11]);
    hold on
end

参考资料:

https://zhidao.baidu.com/question/163154587.html

分类:

技术点:

相关文章:

  • 2022-01-09
  • 2021-11-19
  • 2021-10-15
  • 2021-05-14
  • 2021-11-24
  • 2022-12-23
  • 2021-12-19
  • 2023-03-29
猜你喜欢
  • 2021-07-21
  • 2021-11-20
  • 2022-01-21
  • 2021-12-05
  • 2021-11-06
  • 2022-12-23
  • 2022-12-23
相关资源
相似解决方案