找回密码
 注册
关于网站域名变更的通知
查看: 545|回复: 4
打印 上一主题 下一主题

微分方程求解

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2020-8-13 11:09 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

您需要 登录 才可以下载或查看,没有帐号?注册

x
我最近在做四阶龙格库塔算法的微分方程求解,求大神分享代码,感谢!* f) |5 U0 P0 c# i; C

该用户从未签到

2#
发表于 2020-8-13 13:10 | 只看该作者
function yout = runge_kutta(fun,t,yin,varargin)( T# _8 n, y3 H1 Y1 l1 [
t_interval = t(2)-t(1);1 G+ ~5 y0 ~6 t7 o0 e  z
k1 = t_interval*fun(t(1),yin,varargin);1 I5 P+ |4 \9 ]$ l
k2 = t_interval*fun(t(1)+t_interval/2,yin+k1/2varargin);
& a* ]: C/ r) f; [; P3 E& @k3 = t_interval*fun(t(1)+t_interval/2,yin+k2/2,varargin);( N- d( v4 l3 P' u8 y
k4 = t_interval*fun(t(1)+t_interval,yin+k3,varargin);
  o9 `) c$ }" f' B+ X. `yout = yin+(k1+2*k2+2*k3+k4)/6;: J, n1 O$ I/ u* D1 n% {
end

点评

谢谢大佬,我先去试试  详情 回复 发表于 2020-8-14 13:50

该用户从未签到

3#
 楼主| 发表于 2020-8-14 13:50 | 只看该作者
Uifhjvv 发表于 2020-8-13 13:10# `2 s/ j1 v5 Q. W
function yout = runge_kutta(fun,t,yin,varargin)1 b# R' `6 A/ k
t_interval = t(2)-t(1);
( ^# y2 H7 p: b5 Jk1 = t_interval*fun(t(1),y ...
6 U3 I' T; p7 _$ G/ ^
谢谢大佬,我先去试试
; `: A" Y7 x& f: E3 `6 E" C
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

EDA365公众号

关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

GMT+8, 2025-11-24 18:35 , Processed in 0.156250 second(s), 24 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

快速回复 返回顶部 返回列表