24小时热门版块排行榜    

查看: 2397  |  回复: 8
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

ws89

金虫 (著名写手)

悠然书生

[求助] fortran ,六元一次方程组,编程

各位大侠,跪求援助:
           本人遇到六元一次方程,系数中还有指数项,用手算解不出来,然后用matlab和maple所求得六个未知量,每个未知量都有好几十项,要在fortran里边无法编程呀,各位有什莫好的建议,感激不尽呢。
            这是一篇论文,之前用到拉普拉斯变换,所求未知量是表达式中的一项系数,之后还有拉氏反变换。
现将方程摘录如下,其中k1到k6是未知量,k7及其他变量为已知函数关于拉氏复变量s。
fortran ,六元一次方程组,编程
0SHZQS1OF($8TN7MVILWOCB.jpg


fortran ,六元一次方程组,编程-1
8DS%A@MM$U_B]YS~0MMQJ59.jpg
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

天佑一帆&soul.St.realand
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

tutu6287

银虫 (小有名气)

你这个能化成AX=B的线性方程组不?
除了k1到k6是未知量,其它是变量是不是已知可求量呢?
4楼2013-11-22 14:46:47
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 9 个回答

virtualzx

木虫 (著名写手)

你要求解析解还是数值解?解析解就别用fortran了。数值解,先把每个系数的数值求出来,然后用dgesv
2楼2013-11-21 23:00:45
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

ws89

金虫 (著名写手)

悠然书生

引用回帖:
2楼: Originally posted by virtualzx at 2013-11-21 23:00:45
你要求解析解还是数值解?解析解就别用fortran了。数值解,先把每个系数的数值求出来,然后用dgesv

因为需要求出k1到k6的表达式麽,然后才能正确在Fortran里编辑,建立一个函数,F=K1*EXP(r1x)+K2*EXP(-r1x)+.......+k6*exp(-r3x),最后还要调用F 函数,但这个方程组太复杂了,用fortran解出的解析解字符表达式几百项,所以就不知道如何除了了。
天佑一帆&soul.St.realand
3楼2013-11-22 10:11:16
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

virtualzx

木虫 (著名写手)

引用回帖:
3楼: Originally posted by ws89 at 2013-11-21 21:11:16
因为需要求出k1到k6的表达式麽,然后才能正确在Fortran里编辑,建立一个函数,F=K1*EXP(r1x)+K2*EXP(-r1x)+.......+k6*exp(-r3x),最后还要调用F 函数,但这个方程组太复杂了,用fortran解出的解析解字符表达式几 ...

如果需要的是数值解就不需要k1到k6的表达式。只要能求出所有系数就足够了。一旦知道系数,线性方程组可以很容易地数值解出。
5楼2013-11-22 15:01:04
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:34 by XQNyDCa1Tk5n
[找工作] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 22:26 by XQNyDCa1Tk5n
[公派出国] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:26 by XQNyDCa1Tk5n
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:15 by XQNyDCa1Tk5n
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 22:11 by XQNyDCa1Tk5n
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:06 by XQNyDCa1Tk5n
[教师之家] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:06 by XQNyDCa1Tk5n
[有机交流] OpenAI又攻克数学难题了,离AI做有机合成还有多远? +3 wangyl_123 2026-10-10 6/300 2026-10-11 15:04 by Abin0406
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 14:25 by VOMexwnDzOFZ
[教师之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 (EPI+-1)(金币-50) +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 14:05 by VOMexwnDzOFZ
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:51 by VOMexwnDzOFZ
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:45 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:54 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:34 by VOMexwnDzOFZ
[考博] 招收博士生一名 +3 mandolin 2026-10-10 3/150 2026-10-11 10:21 by 不是山谷!
[教师之家] 课题组会帮你通过考核么? +3 好运来~9527 2026-10-10 5/250 2026-10-11 09:00 by 好运来~9527
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 qR2AdCWTVtkw 2026-10-09 4/200 2026-10-11 03:14 by M0zrYVSAnxpE
[有机交流] 各位大佬,路线设计求助 +6 zapen 2026-10-08 8/400 2026-10-10 15:59 by zapen
[基金申请] 入职后第一次管课题组的专利缴费,对账才发现官费比别人多掏了一倍 +5 13108017953 2026-10-08 5/250 2026-10-10 11:15 by wdwd123
[有机交流] 我应该选哪条合成路线让实验成功率高一些? +5 jing816y 2026-10-08 9/450 2026-10-10 09:05 by zapen
信息提示
请填处理意见