Microsoft MVP성태의 닷넷 이야기
Math: 20. Matlab/Octave로 Gram-Schmidt 정규 직교 집합 구하는 방법 [링크 복사], [링크+제목 복사],
조회: 21371
글쓴 사람
정성태 (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

비밀번호

댓글 작성자
 




... 136  137  138  139  140  141  142  143  144  [145]  146  147  148  149  150  ...
NoWriterDateCnt.TitleFile(s)
1462정성태7/5/201328187VC++: 69. geek스러운 C/C++ 퀴즈 문제 [2]
1461정성태6/27/201344783.NET Framework: 373. C# 문자열의 인코딩이란?
1460정성태6/17/201326586.NET Framework: 372. PerformanceCounter - Category does not exist. [1]
1459정성태6/15/201330187Windows: 74. 한글 키가 아닌 영문 키를 기본으로 선택하는 방법 [5]
1458정성태6/13/201331065.NET Framework: 371. CAS Lock 방식이 과연 성능에 얼마나 도움이 될까요? [1]파일 다운로드1
1457정성태6/13/201327039개발 환경 구성: 192. "Probabilistic Programming and Bayesian Methods for Hackers" 예제 코드 실행 방법
1456정성태6/5/201335701.NET Framework: 370. C# - WebKit .NET 사용 [2]파일 다운로드1
1455정성태6/1/201329611.NET Framework: 369. ThreadPool.QueueUserWorkItem의 실행 지연 [4]파일 다운로드1
1454정성태5/31/201327601Java: 15. Java 7 Control Panel 실행시키는 방법
1453정성태5/22/201326719기타: 32. Microsoft FTP 사이트에 접속하는 방법
1452정성태5/21/201334274Windows: 73. TabProcGrowth 값 삭제 후 IE를 실행시키면 다시 복원되는 경우 [3]
1451정성태5/17/201333170Windows: 72. 윈도우 서버 2012 기초 사용법
1450정성태5/16/201323990오류 유형: 176. SQL10007N Message "0" could not be retrieved. Reason code: "3"
1449정성태5/15/201331030오류 유형: 175. SpeechRecognitionEngine 사용 시 오류 유형 2가지
1448정성태5/14/201326074VC++: 68. #pragma warning(disable: ...)로 오류 제어가 안된다면?
1447정성태5/3/201328150개발 환경 구성: 191. Debugging Tools for Windows 독립 설치 버전 [1]
1446정성태4/30/201328792.NET Framework: 368. Encoding 타입의 대체(fallback) 메카니즘 [1]
1445정성태4/26/201326903디버깅 기술: 54. NT 서비스의 Main 메서드 안에서 Process.GetProcessesByName 호출 시 멈춤 현상 [1]
1444정성태4/26/201330900기타: 31. Internet Explorer: 자바스크립트로 숨겨진 파일 다운로드 경로를 알아내는 방법 [1]
1443정성태4/24/201326172개발 환경 구성: 190. Azure PaaS 웹 응용 프로그램 배포 후 SMTP 서버 구성 [2]
1442정성태4/21/201330265기타: 30. 마이크로소프트 워드의 CPU 점유 현상으로 글자 입력이 느려졌다면? [1]
1441정성태4/21/201336743.NET Framework: 367. LargeAddressAware 옵션이 적용된 닷넷 32비트 프로세스의 가용 메모리 [14]
1440정성태4/19/201325357오류 유형: 174. dumpbin.exe 실행시 mspdb110.dll 로드 오류
1439정성태4/18/201329271VS.NET IDE: 76. Visual Studio 2012와 Itanium 빌드 옵션 [2]
1438정성태4/17/201328926.NET Framework: 366. 다른 프로세스에 환경 변수 설정하는 방법 - 두 번째 이야기 [1]파일 다운로드1
1437정성태4/17/201329096VC++: 67. CRT(C Runtime DLL: msvcr...dll)에 대한 의존성 제거
... 136  137  138  139  140  141  142  143  144  [145]  146  147  148  149  150  ...