24小时热门版块排行榜    

Znn3bq.jpeg
北京石油化工学院2026年研究生招生接收调剂公告
查看: 3465  |  回复: 5
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

LZQ19871

木虫 (小有名气)


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

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

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

» 猜你喜欢

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

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

查看全部散金贴

已阅   回复此楼   关注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的回帖
查看全部 6 个回答

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的回帖

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的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 324求调剂 +10 想上学求调 2026-04-03 10/500 2026-04-08 11:08 by danney002
[考研] 机械专硕273请求调剂 +4 庚申壬申 2026-04-07 4/200 2026-04-08 08:50 by tt19890111
[考研] 362求调剂 +8 我要考大 2026-04-06 12/600 2026-04-08 00:32 by JourneyLucky
[考研] 080100力学316求调剂 +3 L_Hairui 2026-04-07 3/150 2026-04-07 23:26 by JourneyLucky
[考研] 323求调剂 +3 林zlu 2026-04-07 4/200 2026-04-07 23:21 by lbsjt
[考研] 363求调剂 +9 zh096 2026-04-04 9/450 2026-04-07 21:51 by 418490947
[考研] 求调剂 +11 张zic 2026-04-05 12/600 2026-04-07 17:20 by 橘咂!
[考研] 085404 293求调剂 +8 勇远库爱314 2026-04-06 9/450 2026-04-07 13:05 by flydream1314
[考研] 285求调剂 +16 哦呦呼o 2026-04-04 16/800 2026-04-07 12:31 by 1018329917
[考研] 293求调剂 +3 勇远库爱314 2026-04-06 3/150 2026-04-07 11:15 by hugr
[考研] 085100建筑学 寻求跨专业调剂 一志愿南大294分 校级省级国家级奖项若干 踏实肯干 +3 1021075758 2026-04-06 4/200 2026-04-07 09:23 by 蓝云思雨
[考研] 一志愿河北工业大学材料工程,初试344求专硕调剂 +6 15933906766 2026-04-05 6/300 2026-04-06 13:21 by 无际的草原
[考研] 288求调剂 一志愿哈工大 材料与化工 +13 洛神哥哥 2026-04-03 13/650 2026-04-05 17:27 by zzx2138
[考研] 0832食品科学与工程学硕282调剂 +6 鱼在水中游a 2026-04-02 9/450 2026-04-05 11:45 by flysky1234
[考研] 313求调剂 +3 海日海日 2026-04-04 3/150 2026-04-05 07:48 by 544594351
[考研] 292求调剂 +11 2022080213 2026-04-04 13/650 2026-04-04 18:38 by macy2011
[考研] 一志愿0817化学工程与技术,求调剂 +24 我不是只因 2026-04-02 28/1400 2026-04-04 15:15 by dongzh2009
[考研] 兽医调剂 +3 wh119216 2026-04-02 3/150 2026-04-03 19:34 by zrongyan
[考研] 312求调剂 +4 赊月色 2026-04-02 5/250 2026-04-03 08:21 by fangshan711
[考研] 321求调剂 一志愿 浙江工业大学生物医药 +5 嘿嘿HC 2026-04-01 6/300 2026-04-02 15:23 by sophie2180
信息提示
请填处理意见