Fortran Coder

查看: 4883|回复: 5
打印 上一主题 下一主题

如何用Fortran求解矩阵指数

[复制链接]

5

帖子

2

主题

0

精华

入门

F 币
54 元
贡献
25 点
跳转到指定楼层
楼主
发表于 2021-9-6 10:34:11 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 wx_TrpjQ8uw 于 2021-9-6 10:39 编辑

矩阵A大约百十来阶,求exp(-tA),t为常数参数
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

5

帖子

2

主题

0

精华

入门

F 币
54 元
贡献
25 点
沙发
 楼主| 发表于 2021-9-6 10:37:05 | 只看该作者
C:\Users\Administrator\Desktop

835

帖子

2

主题

0

精华

大宗师

F 币
3926 元
贡献
2334 点
板凳
发表于 2021-9-6 10:50:37 | 只看该作者
本帖最后由 li913 于 2021-9-6 12:10 编辑

这是无穷累加,只需要满足精度的前n次就行。如果矩阵不大,可以直接求,代码如下
计算矩阵函数 exp(A)-CSDN社区

QQ截图20210906104917.png (101.66 KB, 下载次数: 178)

QQ截图20210906104917.png

167

帖子

2

主题

1

精华

大师

Vim

F 币
1011 元
贡献
484 点

规矩勋章

地板
发表于 2021-9-6 11:36:21 | 只看该作者
先求出矩阵的特征值和特征向量,把特征值取exp之后,再利用矩阵乘法变换回去即可

5

帖子

2

主题

0

精华

入门

F 币
54 元
贡献
25 点
5#
 楼主| 发表于 2021-9-6 15:23:30 | 只看该作者
Transpose 发表于 2021-9-6 11:36
先求出矩阵的特征值和特征向量,把特征值取exp之后,再利用矩阵乘法变换回去即可 ...

感谢感谢

178

帖子

15

主题

0

精华

大宗师

F 币
4973 元
贡献
1152 点
6#
发表于 2021-9-7 20:33:05 | 只看该作者
若A不是一个厄米矩阵,这个问题数值上就是没有什么好办法
很可能计算本身就是不稳定的
如果是厄米矩阵,那么就用正交矩阵对角化就是了
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-11-22 11:54

Powered by Tencent X3.4

© 2013-2024 Tencent

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