Microsoft MVP성태의 닷넷 이야기
Math: 20. Matlab/Octave로 Gram-Schmidt 정규 직교 집합 구하는 방법 [링크 복사], [링크+제목 복사],
조회: 21319
글쓴 사람
정성태 (techsharer at outlook.com)
홈페이지
첨부 파일
 
(연관된 글이 1개 있습니다.)

Matlab/Octave로 Gram-Schmidt 정규 직교 집합 구하는 방법

a 행렬을 정의하고,

a = [1,1,0; 0,1,2; 1,2,1]'
a =

   1   0   1
   1   1   2
   0   2   1

matlab/octave로 QR 분해하면 다음과 같은 결과가 나옵니다.

[q,r] = qr(a)
q =

  -0.70711   0.23570   0.66667
  -0.70711  -0.23570  -0.66667
  -0.00000  -0.94281   0.33333

r =

  -1.41421  -0.70711  -2.12132
   0.00000  -2.12132  -1.17851
   0.00000   0.00000  -0.33333

참고로, wolframalpha 웹 사이트에서 확인하면 실수 계산 값이 아닌 분수 형태의 값으로 구할 수 있습니다. (단지, 부호가 반대입니다.)

gram schmidt {{1,0,1},{1,1,2},{0,2,1}}
; http://m.wolframalpha.com/input/?i=gram+schmidt+%7B%7B1%2C1%2C0%7D%2C%7B0%2C1%2C2%7D%2C%7B1%2C2%2C1%7D%7D&x=0&y=0

1/sqrt(2), -1/(3*sqrt(2)), -2/3
1/sqrt(2), 1/(3*sqrt(2)) , 2/3
0        , 2*sqrt(2) / 3 , -1/3

여기서, Q 결괏값은 직교 행렬로 Xi * Xj = 0 (i != j)인 조건을 만족합니다. 검증은 다음과 같이 쉽게 할 수 있습니다.

# a1 = [-0.70711, -0.70711, 0]
# a2 = [0.23570, -0.23570, -0.94281]
# a3 = [0.66667, -0.66667, 0.33333]

a1 = q(:,1)'
a2 = q(:,2)'
a3 = q(:,3)'

>> dot(a1, a2)
ans = 0
>> dot(a2, a3)
ans = 1.3807e-006  // 실수 계산 값의 오차 누적으로 인한 것일 뿐 0 값임!
>> dot(a3, a1)
ans = 0

또한, Q 결괏값은 정규 직교 행렬이기 때문에 Xi * Xj = 1 (i == j)인 조건을 만족하고, 이는 norm의 값이 1이므로 다음과 같이 검증할 수 있습니다.

>> dot(a1,a1)
ans =  1.0000
>> norm(a1)
ans =  1.0000

// 이하 a2, a3에 대해서도 동일한 결괏값

QR 분해의 Q 행렬은 Gram-Schmidt 정규 직교화 과정에 해당하기 때문에 다음과 같이 수작업으로도 구할 수 있습니다.

a1 = [1,1,0]

na1 = norm(a1)
ea1 = a1 / na1 // 계산 값: 0.70711, 0.70711, 0

a2 = [0,1,2]
_a2 = a2 - dot(a2,ea1) * ea1

n_a2 = norm(_a2)
ea2 = _a2 / n_a2 // 계산 값: -0.23570   0.23570   0.94281

a3 = [1,2,1]
_a3 = a3 - dot(a3,ea1) * ea1 - dot(a3,ea2) * ea2

n_a3 = norm(_a3)
ea3 = _a3 / n_a3 // 계산 값: -0.66667   0.66667  -0.33333

재미있는 것은, 직접 계산한 값의 경우에도 부호는 wolframalpha의 것과 같은 반면 matlab/octave의 QR 함수와는 반대입니다. (혹시 이 이유를 알고 계신 분은 덧글 부탁드립니다. ^^)

실제로 이런 수작업을 별도의 함수로 구현하고 그것이 matlab/octave의 qr 함수와 같다는 것을 다음의 문서에서 정리하고 있습니다.

The Gram-Schmidt process in Matlab
; https://www.math.purdue.edu/~wang838/teaching/GramSchmidt.pdf




기왕 해본 김에 octave 명령어도 알아볼 겸, 정규 직교 집합을 시각화해보겠습니다.

a1 = [1,1,0]'
a2 = [0,1,2]'
a3 = [1,2,1]'

a = [a1 a2 a3]
[q,r] = qr(a)

ad1 = quiver3(0,0,0,-q(1),-q(2),-q(3))
hold on
ad2 = quiver3(0,0,0,-q(4),-q(5),-q(6))
hold on
ad3 = quiver3(0,0,0,-q(7),-q(8),-q(9))
hold on

axis equal

text(-q(1),-q(2),-q(3), 'ad1')
text(-q(4),-q(5),-q(6), 'ad2')
text(-q(7),-q(8),-q(9), 'ad3')

그럼, 다음과 같은 결과를 얻을 수 있고 "Rotate" 기능을 이용해 마우스로 이리저리 돌려 보면 3개의 벡터가 직교하고 있음을 눈으로 쉽게 확인할 수 있습니다.

gramschmidt_1.png




[이 글에 대해서 여러분들과 의견을 공유하고 싶습니다. 틀리거나 미흡한 부분 또는 의문 사항이 있으시면 언제든 댓글 남겨주십시오.]

[연관 글]






[최초 등록일: ]
[최종 수정일: 4/6/2023]

Creative Commons License
이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-변경금지 2.0 대한민국 라이센스에 따라 이용하실 수 있습니다.
by SeongTae Jeong, mailto:techsharer at outlook.com

비밀번호

댓글 작성자
 




... [151]  152  153  154  155  156  157  158  159  160  161  162  163  164  165  ...
NoWriterDateCnt.TitleFile(s)
1310정성태7/13/201233815Math: 7. C# - 펜타그램(Pentagram) 그리기파일 다운로드1
1309정성태7/13/201232028개발 환경 구성: 155. 윈도우 운영체제에서 기본적으로 사용할 수 있는 압축 해제 방법
1308정성태7/3/201227403.NET Framework: 330. IEnumerator는 언제나 읽기 전용일까?파일 다운로드1
1307정성태6/30/201229728개발 환경 구성: 154. Sysnet, Azure를 만나다. [5]
1306정성태6/29/201230205제니퍼 .NET: 22. 눈으로 확인하는 connectionManagement의 maxconnection 설정값 [4]
1305정성태6/28/201228519오류 유형: 157. IIS 6 - WCF svc 호출 시 404 Not Found 발생
1304정성태6/27/201229254개발 환경 구성: 153. sysnet 첨부 파일을 Azure Storage에 마이그레이션 [3]파일 다운로드1
1303정성태6/26/201228825개발 환경 구성: 152. sysnet DB를 SQL Azure 데이터베이스로 마이그레이션
1302정성태6/25/201230783개발 환경 구성: 151. Azure 웹 사이트에 사용자 도메인 네임 연결하는 방법
1301정성태6/20/201227162오류 유형: 156. KB2667402 윈도우 업데이트 실패 및 마이크로소프트 Answers 웹 사이트 대응
1300정성태6/20/201233678.NET Framework: 329. C# - Rabin-Miller 소수 생성방법을 이용하여 RSACryptoServiceProvider의 개인키를 직접 채워보자 [1]파일 다운로드2
1299정성태6/18/201234262제니퍼 .NET: 21. 제니퍼 닷넷 - Ninject DI 프레임워크의 성능 분석 [2]파일 다운로드2
1298정성태6/14/201235958VS.NET IDE: 72. Visual Studio에서 pfx 파일로 서명한 경우, 암호는 어디에 저장될까? [2]
1297정성태6/12/201232458VC++: 63. 다른 프로세스에 환경 변수 설정하는 방법파일 다운로드1
1296정성태6/5/201229026.NET Framework: 328. 해당 DLL이 Managed인지 / Unmanaged인지 확인하는 방법 - 두 번째 이야기 [4]파일 다운로드1
1295정성태6/5/201226427.NET Framework: 327. RSAParameters와 System.Numerics.BigInteger 이야기파일 다운로드1
1294정성태5/27/201250506.NET Framework: 326. 유니코드와 한글 - 유니코드와 닷넷을 이용한 한글 처리 [7]파일 다운로드2
1293정성태5/24/201230941.NET Framework: 325. System.Drawing.Bitmap 데이터를 Parallel.For로 처리하는 방법 [2]파일 다운로드1
1292정성태5/24/201224621.NET Framework: 324. First-chance exception에 대해 조건에 따라 디버거가 멈추게 할 수는 없을까? [1]파일 다운로드1
1291정성태5/23/201231518VC++: 62. 배열 초기화를 위한 기계어 코드 확인 [2]
1290정성태5/18/201236440.NET Framework: 323. 관리자 권한이 필요한 작업을 COM+에 대행 [7]파일 다운로드1
1289정성태5/17/201240792.NET Framework: 322. regsvcs.exe로 어셈블리 등록 시 시스템 변경 사항 [5]파일 다운로드2
1288정성태5/17/201227780.NET Framework: 321. regasm.exe로 어셈블리 등록 시 시스템 변경 사항 (3) - Type Library파일 다운로드1
1287정성태5/17/201230575.NET Framework: 320. regasm.exe로 어셈블리 등록 시 시스템 변경 사항 (2) - .NET 4.0 + .NET 2.0 [2]
1286정성태5/17/201239426.NET Framework: 319. regasm.exe로 어셈블리 등록 시 시스템 변경 사항 (1) - .NET 2.0 + x86/x64/AnyCPU [5]
1285정성태5/16/201234555.NET Framework: 318. gacutil.exe로 어셈블리 등록 시 시스템 변경 사항파일 다운로드1
... [151]  152  153  154  155  156  157  158  159  160  161  162  163  164  165  ...