MATLAB 板


LINE

※ 引述《snow3804 (snow3804)》之铭言: : matlab有hess(A)可以将矩阵A转换成Hessenberg矩阵 : 但我想知道这中间是怎麽计算的 : 搜寻电脑里有hess.m档只是打开却只看到注解而已 : http://tinyurl.com/m6v7p96 : 有没有办法可以知道是怎麽实作的 推 iHakka: matlab是用lapack去实作的,可以追回去看看 08/13 19:27 推 infernodimon: lapack里有 印象中是用householder 08/14 19:50 我讲一下原由,我在这里查到Hessenberg的matlab程式码 http://www.auburn.edu/~tamtiny/lecture%2010.pdf function [H,Q]=houshess(A) n=max(size(A)); Q=eye(n); H=A; for k=1:(n-2) [v,beta]=vhouse(H(k+1:n,k)); I=eye(k); N=zeros(k,n-k); m=length(v); R=eye(m)-beta*v*v'; HH=H(k+1:n,k:n); H(k+1:n,k:n)=R*H(k+1:n,k:n); HH=H(1:n,k+1:n); H(1:n,k+1:n)=H(1:n,k+1:n)*R; P=[I, N; N', R]; Q=Q*P; end return function [v,beta]=vhouse(x) n=length(x); x=x/norm(x); s=x(2:n)'*x(2:n); v=[1; x(2:n)]; if (s==0), beta=0; else mu=sqrt(x(1)^2+s); if (x(1) <= 0) v(1)=x(1)-mu; else v(1)=-s/(x(1)+mu); end beta=2*v(1)^2/(s+v(1)^2); v=v/v(1); end return 但执行的结果和matla内建的hess()结果不一样 http://www.mathworks.com/help/matlab/ref/hess.html A=[-149 -50 -154;537 180 546;-27 -9 -25]; H=houshess(A) H = -149.0000 -42.2037 156.3165 537.6783 152.5511 -554.9272 0 0.0728 2.4489 H=hess(A) H = -149.0000 42.2037 -156.3165 -537.6783 152.5511 -554.9272 0 0.0728 2.4489 看得出来其实只是有些地方差个负号而已 当然这两个都是Hessenberg矩阵 但我还是想知道程式码是差在哪里造成正负号不同 lapack我努力去找到程式码,只是lapack是用fortran写的,但我看不懂程式码 http://www.netlib.org/lapack/explore-3.1.1-html/sgehrd.f.html --



※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 114.42.124.128
※ 文章网址: http://webptt.com/cn.aspx?n=bbs/MATLAB/M.1408045892.A.54A.html ※ 编辑: snow3804 (114.42.124.128), 08/15/2014 04:00:43







like.gif 您可能会有兴趣的文章
icon.png[问题/行为] 猫晚上进房间会不会有憋尿问题
icon.pngRe: [闲聊] 选了错误的女孩成为魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一张
icon.png[心得] EMS高领长版毛衣.墨小楼MC1002
icon.png[分享] 丹龙隔热纸GE55+33+22
icon.png[问题] 清洗洗衣机
icon.png[寻物] 窗台下的空间
icon.png[闲聊] 双极の女神1 木魔爵
icon.png[售车] 新竹 1997 march 1297cc 白色 四门
icon.png[讨论] 能从照片感受到摄影者心情吗
icon.png[狂贺] 贺贺贺贺 贺!岛村卯月!总选举NO.1
icon.png[难过] 羡慕白皮肤的女生
icon.png阅读文章
icon.png[黑特]
icon.png[问题] SBK S1安装於安全帽位置
icon.png[分享] 旧woo100绝版开箱!!
icon.pngRe: [无言] 关於小包卫生纸
icon.png[开箱] E5-2683V3 RX480Strix 快睿C1 简单测试
icon.png[心得] 苍の海贼龙 地狱 执行者16PT
icon.png[售车] 1999年Virage iO 1.8EXi
icon.png[心得] 挑战33 LV10 狮子座pt solo
icon.png[闲聊] 手把手教你不被桶之新手主购教学
icon.png[分享] Civic Type R 量产版官方照无预警流出
icon.png[售车] Golf 4 2.0 银色 自排
icon.png[出售] Graco提篮汽座(有底座)2000元诚可议
icon.png[问题] 请问补牙材质掉了还能再补吗?(台中半年内
icon.png[问题] 44th 单曲 生写竟然都给重复的啊啊!
icon.png[心得] 华南红卡/icash 核卡
icon.png[问题] 拔牙矫正这样正常吗
icon.png[赠送] 老莫高业 初业 102年版
icon.png[情报] 三大行动支付 本季掀战火
icon.png[宝宝] 博客来Amos水蜡笔5/1特价五折
icon.pngRe: [心得] 新鲜人一些面试分享
icon.png[心得] 苍の海贼龙 地狱 麒麟25PT
icon.pngRe: [闲聊] (君の名は。雷慎入) 君名二创漫画翻译
icon.pngRe: [闲聊] OGN中场影片:失踪人口局 (英文字幕)
icon.png[问题] 台湾大哥大4G讯号差
icon.png[出售] [全国]全新千寻侘草LED灯, 水草

请输入看板名称,例如:Gossiping站内搜寻

TOP