24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 3451  |  回复: 5

LZQ19871

专家顾问

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!


[交流] 【求助】fortran:如何求解 复数矩阵的秩【已完结】

利用fortran编程如何求解   复数矩阵的秩?
        希望提供参考书 或 相应建议 或程序谢谢各位了!

[ Last edited by nono2009 on 2010-11-12 at 08:36 ]
回复此楼

» 猜你喜欢

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

» 抢金币啦!回帖就可以得到:

查看全部散金贴

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

chine365

主管区长

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!



nono2009(金币+1):鼓励应助 2010-11-10 18:37:09
LZQ19871(金币+20):谢谢! lapack库我已经都弄好了,里面函数太多,不知道如何利用。现在不确定zgesdd是我要用的函数,谢谢了!能请教下,如何能够在lapack中找到自己要用的函数呢? 2010-11-10 19:57:33
Matlab是采用奇异值分解来做的,算法:
s = svd(A);
tol = max(size(A))*eps(max(s));
r = sum(s > tol);

要是用Fortran写的话,可以去调用LAPACK中的zgesdd.f
http://www.netlib.org/lapack/index.html
2楼2010-11-10 15:56:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

LZQ19871

超级版主

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!


谢了!

引用回帖:
Originally posted by chine365 at 2010-11-10 15:56:45:
Matlab是采用奇异值分解来做的,算法:
s = svd(A);
tol = max(size(A))*eps(max(s));
r = sum(s > tol);

要是用Fortran写的话,可以去调用LAPACK中的zgesdd.f
[url]http://www.netlib.org/lapack/inde ...

你好!
   谢谢! lapack库我已经都弄好了,里面函数太多,不知道如何利用。现在不确定zgesdd是我要用的函数,谢谢了!能请教下,如何能够在lapack中找到自己要用的函数呢?
3楼2010-11-10 19:59:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

chine365

超级版主

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!



nono2009(金币+1):鼓励应助 2010-11-11 07:40:13
LZQ19871(金币+30): 2010-11-11 10:54:01
可以去 LAPACK Users' Guide Third Edition 这本书中去找
http://www.netlib.org/lapack/lug/index.html
,里面对实现各种功能的函数做了分类,包括处理的数据类型,初次看可能比较费劲;也可以去查看matlab的help,matlab中好多矩阵处理相关的函数的实现也是调用LAPACK中的函数,help里面有说明,我就是这样找的。
4楼2010-11-10 20:31:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

LZQ19871

超级版主

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!


引用回帖:
Originally posted by chine365 at 2010-11-10 20:31:16:
可以去 LAPACK Users' Guide Third Edition 这本书中去找
http://www.netlib.org/lapack/lug/index.html
,里面对实现各种功能的函数做了分类,包括处理的数据类型,初次看可能比较费劲;也可以去查 ...

恩,好的。非常感谢!
    我现在会求矩阵的秩了!
    use imsl
   然后直接调用rank()函数就可以了,实数,复数型矩阵都能求。
  你推荐的书,我去看看,非常感谢!
5楼2010-11-11 10:53:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

乐乐乐乐翻天

主管区长

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!



小木虫: 金币+0.5, 给个红包,谢谢回帖
引用回帖:
5楼: Originally posted by LZQ19871 at 2010-11-11 10:53:51
恩,好的。非常感谢!
    我现在会求矩阵的秩了!
    use imsl
   然后直接调用rank()函数就可以了,实数,复数型矩阵都能求。
  你推荐的书,我去看看,非常感谢!...

请问,现在lmsl不能用了,只能用mkl了,那矩阵的秩现在又如何才能得出呢?求赐教啊~
6楼2019-05-27 11:09:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 LZQ19871 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 08工科275求调剂,可跨考。 +3 AaAa7420 2026-03-31 3/150 2026-04-01 09:27 by JourneyLucky
[考研] 334分 一志愿武理-080500 材料求调剂 +11 李李不服输 2026-03-25 11/550 2026-04-01 08:11 by yanflower7133
[考研] 0703本科郑州大学求调剂 +8 nhj_ 2026-03-25 8/400 2026-04-01 08:08 by yanflower7133
[考研] 294分080500材料科学与工程求调剂 +12 柳溪边 2026-03-26 13/650 2026-04-01 01:37 by 1018329917
[考研] 环境工程297分求调剂一志愿杭高院 +10 GENJIOW 2026-03-31 10/500 2026-04-01 01:30 by 1018329917
[考研] 335求调剂 +3 321* 2026-03-31 4/200 2026-04-01 00:00 by 321*
[考研] 一志愿西交大080500材料学硕349 +6 jqx1258 2026-03-31 7/350 2026-03-31 21:08 by yuq
[考研] 318求调剂 +3 笃行致远. 2026-03-31 3/150 2026-03-31 20:27 by 求调剂zz
[考研] 省双一流重点一本大学招收调剂 +3 wwwwffffff 2026-03-31 5/250 2026-03-31 19:49 by 曾曾曾!
[考研] 299求调剂 +8 嗯嗯嗯嗯2 2026-03-27 8/400 2026-03-31 18:23 by lizhi8172
[考研] 求调剂 生物学 377分 +6 zzll03 2026-03-31 6/300 2026-03-31 17:33 by 唐沐儿
[考研] 086000生物与医药 初试274求调剂 +4 小叮当来了 2026-03-30 4/200 2026-03-31 16:48 by shengliu165
[考研] 354求调剂 +3 lxb598 2026-03-31 4/200 2026-03-31 13:42 by sophie2180
[考研] 085600 286分 材料求调剂 +11 麻辣鱿鱼 2026-03-27 12/600 2026-03-30 19:33 by Wang200018
[考研] 348求调剂 +6 小懒虫不懒了 2026-03-28 6/300 2026-03-30 10:29 by Evan_Liu
[考研] 329求调剂 +10 钮恩雪 2026-03-25 10/500 2026-03-29 13:32 by peike
[考研] 一志愿北京理工大学本科211材料工程294求调剂 +8 mikasa的围巾 2026-03-28 8/400 2026-03-29 12:48 by 无际的草原
[考研] 315分求调剂 +7 26考研上岸版26 2026-03-26 7/350 2026-03-28 04:05 by fmesaito
[考研] 一志愿郑大085600,310分求调剂 +5 李潇可 2026-03-26 5/250 2026-03-27 11:14 by 不吃魚的貓
[考研] 一志愿 南京邮电大学 288分 材料考研 求调剂 +3 jl0720 2026-03-26 3/150 2026-03-26 13:39 by zzll406
信息提示
请填处理意见