24小时热门版块排行榜    

查看: 3225  |  回复: 10

舒马诺

银虫 (初入文坛)

[求助] 带平方根的(LLT)Cholesky算法分解对称正定矩阵 c语言实现

新人,不懂规矩,见谅

大神们好,要求
1先判断任意矩阵A是否为正定对称矩阵,否则,返回输入错误
2若输入为正定对称矩阵,则将其进行带平方根的(LLT)Cholesky算法分解,即实现A=LL^T,其中L为下三角形矩阵。

大致就这意思,求助

定理
回复此楼
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

xiuyouxu

铁杆木虫 (职业作家)

【答案】应助回帖

感谢参与,应助指数 +1
建议找一本数值分析的书看一下,里面有具体的算法,我以前实现过,其他语言的,没有用c语言做过.
忘记自己,忘记一切烦恼(欢迎访问我的网站兆字节:http://www.mathbeta.com/)
2楼2012-05-03 21:28:11
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

舒马诺

银虫 (初入文坛)

???????:
2?: Originally posted by xiuyouxu at 2012-05-03 21:28:11:
???????????????????????,?????о??????,?????????,?????????,?????c????????.

# include
# include
void main()
{
        float m,A[9];
float L[6];
        printf("请输入矩阵: \n ";
        scanf("%f %f %f\n%f %f %f\n%f %f %f\n",&A[0],&A[1],&A[2],&A[3],&A[4],&A[5],&A[6],&A[7],&A[8]);
        printf("请输入??许误差:m=";
scanf("%f",&m);
if
        A[0]>m&&(A[0]*A[4]-A[1]*A[3]>m)&&(A[6]*A[4]*A[2]+A[0]*A[7]*A[5]+A[1]*A[3]*A[8]-A[0]*A[4]*A[8]-A[1]*A[6]*A[5]-A[2]*A[3]*A[7]>m)&&(A[1]==A[3])&&(A[2]==A[6])&&(A[5]==A[7])
{
L[0]=sqrt(A[0]);
L[1]=A[3]/L[0];
L[3]=A[6]/L[0];
L[2]=sqrt(A[4]-L[1]*L[1]);
L[4]=(A[7]-L[3]*L[1])/L[2];
L[5]=sqrt(A[8]-L[3]*L[3]-L[4]*L[4]);
printf("所求矩阵为L=\n %f 0 0\n%f %f 0\n%f %f %f\n",L[0],L[1],L[2],L[3],L[4], L[5]);
}
else
printf("输入有误,请检查";
}
调试??行:
1>.\Debug\shiyan.exe.intermediate.manifest : general error c1010070: Failed to load and parse the manifest. {_~0p'1a@'7v par 1>Build log was saved at "file://e:\360data\????数???\桌???\shiyan\shiyan\Debug\BuildLog.htm"
1>shiyan - 1 error(s), 0 warning(s)
========== Rebuild All: 0 succeeded, 1 failed, 0 skipped ==========
工程无法建立

预期效果:
请输入矩阵:
1 2 3
2 4 5
3 5 6
请输入??许误差:m=1e-6
输入有误,请检查
请输入矩阵:
5 2 -4
2 1 -2
-4 -2 5
请输入??许误差:m=1e-6
所求矩阵L=
2.236068 0 0
0.894427 0.4472136 0
-1.788854 -0.894427 1




我的算法??行??通过啊,而且根本未能实现针对任??阶次的矩阵。。。求大神帮忙~
3楼2012-05-03 22:13:16
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

舒马诺

银虫 (初入文坛)

引用回帖:
2楼: Originally posted by xiuyouxu at 2012-05-03 21:28:11:
建议找一本数值分析的书看一下,里面有具体的算法,我以前实现过,其他语言的,没有用c语言做过.

# include
# include
void main()
{
        float m,A[9];
float L[6];
        printf("请输入矩阵: \n ";
        scanf("%f %f %f\n%f %f %f\n%f %f %f\n",&A[0],&A[1],&A[2],&A[3],&A[4],&A[5],&A[6],&A[7],&A[8]);
        printf("请输入允许误差:m=";
scanf("%f",&m);
if
        A[0]>m&&(A[0]*A[4]-A[1]*A[3]>m)&&(A[6]*A[4]*A[2]+A[0]*A[7]*A[5]+A[1]*A[3]*A[8]-A[0]*A[4]*A[8]-A[1]*A[6]*A[5]-A[2]*A[3]*A[7]>m)&&(A[1]==A[3])&&(A[2]==A[6])&&(A[5]==A[7])
{
L[0]=sqrt(A[0]);
L[1]=A[3]/L[0];
L[3]=A[6]/L[0];
L[2]=sqrt(A[4]-L[1]*L[1]);
L[4]=(A[7]-L[3]*L[1])/L[2];
L[5]=sqrt(A[8]-L[3]*L[3]-L[4]*L[4]);
printf("所求矩阵为L=\n %f 0 0\n%f %f 0\n%f %f %f\n",L[0],L[1],L[2],L[3],L[4], L[5]);
}
else
printf("输入有误,请检查";
}

调试运行:
1>.\Debug\shiyan.exe.intermediate.manifest : general error c1010070: Failed to load and parse the manifest. {_~0p'1a@'7v par 1>Build log was saved at "file://e:\360data\重要数据\桌面\shiyan\shiyan\Debug\BuildLog.htm"
1>shiyan - 1 error(s), 0 warning(s)
========== Rebuild All: 0 succeeded, 1 failed, 0 skipped ==========
工程无法建立



失败了,而且达不到针对任意阶次矩阵的效果!
4楼2012-05-03 22:17:09
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

xiuyouxu

铁杆木虫 (职业作家)

【答案】应助回帖

matlab里面直接用root函数就可以了, 下面是我写的c++的:
// 定义Matrix类(略)
// m*n阶0矩阵
void Matrix::zeros(int m,int n,double** a){
        for(int i=0;i                 for(int j=0;j                         a[j]=0;
                }
        }
}

// n为矩阵的阶
void Matrix::root(int n,double** A,double** L){
     zeros(n,n,L);
     for(int i=0;i              for(int j=0;j                      double sum=0;
                     for(int k=0;k                              sum+=L[k]*L[j][k];
                     }
                     L[j]=(A[j]-sum)/L[j][j];
             }
             double sum=0;
             for(int k=0;k                      sum+=L[k]*L[k];
             }
             L=sqrt(A-sum);// 显然 A-sum<0时不是正定矩阵
     }
}
忘记自己,忘记一切烦恼(欢迎访问我的网站兆字节:http://www.mathbeta.com/)
5楼2012-05-03 22:29:03
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

舒马诺

银虫 (初入文坛)

引用回帖:
5楼: Originally posted by xiuyouxu at 2012-05-03 22:29:03:
matlab里面直接用root函数就可以了, 下面是我写的c++的:
// 定义Matrix类(略)
// m*n阶0矩阵
void Matrix::zeros(int m,int n,double** a){
        for(int i=0;i<m;i++){
                for(int j=0;j<n;j++){
                        a=0; ...

还是运行不通。。。
6楼2012-05-03 23:00:27
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

xiuyouxu

铁杆木虫 (职业作家)

【答案】应助回帖

晕,这个回复框不能放代码啊,有一部分代码被替换掉了,代码里不能出现,会被替换掉
忘记自己,忘记一切烦恼(欢迎访问我的网站兆字节:http://www.mathbeta.com/)
7楼2012-05-03 23:09:59
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

xiuyouxu

铁杆木虫 (职业作家)

看看这样行不行 \[i\]
忘记自己,忘记一切烦恼(欢迎访问我的网站兆字节:http://www.mathbeta.com/)
8楼2012-05-03 23:10:36
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

xiuyouxu

铁杆木虫 (职业作家)

【答案】应助回帖

void Matrix::zeros(int m,int n,double** a){
        for(int i=0;i                 for(int j=0;j                         a\[i\][j]=0;
                }
        }
}

void Matrix::root(int n,double** A,double** L){
     zeros(n,n,L);
     for(int i=0;i              for(int j=0;j                      double sum=0;
                     for(int k=0;k                              sum+=L\[i\][k]*L[j][k];
                     }
                     L[j]=(A[j]\[i\]-sum)/L[j][j];
             }
             double sum=0;
             for(int k=0;k                      sum+=L\[i\][k]*L\[i\][k];
             }
             L=sqrt(A\[i\]\[i\]-sum);
     }
}

把上面的中括号前的反斜线去掉就行了
忘记自己,忘记一切烦恼(欢迎访问我的网站兆字节:http://www.mathbeta.com/)
9楼2012-05-03 23:12:39
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

舒马诺

银虫 (初入文坛)

引用回帖:
7楼: Originally posted by xiuyouxu at 2012-05-03 23:09:59:
晕,这个回复框不能放代码啊,有一部分代码被替换掉了,代码里不能出现,会被替换掉

多谢高手帮忙了,弱弱的问一句能不能发到wuleileihappy@163.com呢?感激不尽
10楼2012-05-03 23:13:29
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 舒马诺 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 h4CP7TrQR8Lg 2026-08-22 5/250 2026-08-23 12:09 by LR9qGULyN2ew
[基金申请] 什么时候开奖? +9 CrisMessi 2026-08-18 10/500 2026-08-23 12:03 by 丶昵称占用
[基金申请] 2026国自然函评费到账 +15 羊腰板 2026-08-21 16/800 2026-08-23 10:45 by process2012
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 2JOx3r2CYEgw 2026-08-21 9/450 2026-08-23 10:44 by IXZuIJ2Q7OVy
[基金申请] 让我中一个面上吧! +12 大萍1987 2026-08-20 14/700 2026-08-23 10:30 by wrm
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 2JOx3r2CYEgw 2026-08-21 10/500 2026-08-23 07:17 by OEbVnUOu01ol
[论文投稿] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 2JOx3r2CYEgw 2026-08-22 4/200 2026-08-23 04:04 by OEbVnUOu01ol
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 QTy3jDtz1uLt 2026-08-21 11/550 2026-08-23 02:55 by OEbVnUOu01ol
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 DpSrDtM079iu 2026-08-22 3/150 2026-08-23 00:55 by OEbVnUOu01ol
[基金申请] 93BebMhtakh前后11位开头都是大写 +7 且听虎啸 2026-08-17 8/400 2026-08-22 21:55 by 医学老男孩
[基金申请] 人气不行了 +8 fansofjerry 2026-08-21 8/400 2026-08-22 16:30 by zyqchem
[基金申请] 建议基金发布提前给出明确的时间点 +10 kulium 2026-08-21 13/650 2026-08-21 21:58 by alongwaytogo
[基金申请] 看来今天不会放榜了? +8 chengyan1220 2026-08-21 11/550 2026-08-21 17:52 by dcqxinyang
[基金申请] 时间戳又变了 +13 wuchongjun 2026-08-20 19/950 2026-08-21 17:21 by 紫杉醇
[基金申请] 我面上完蛋了 +7 且听虎啸 2026-08-20 8/400 2026-08-21 12:31 by 酷酷墨镜
[论文投稿] 投稿咨询 +5 wwm09 2026-08-17 7/350 2026-08-21 10:11 by 期刊论文帮手
[基金申请] 估计是周四 +3 archvillain 2026-08-18 3/150 2026-08-21 01:48 by jnhyjjm
[基金申请] 重要消息,中午系统在维护 +11 yuleib84 2026-08-18 12/600 2026-08-20 11:09 by xskun
[基金申请] 朋友圈看到的 +6 wangzilk 2026-08-18 8/400 2026-08-19 10:55 by Haru815
[基金申请] 今天维护系统维护 祝所有人 高中 +8 gjjjzhong 2026-08-18 9/450 2026-08-18 13:01 by 家与远方
信息提示
请填处理意见