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

비밀번호

댓글 작성자
 




... 31  32  33  34  35  36  37  38  39  40  41  42  43  [44]  45  ...
NoWriterDateCnt.TitleFile(s)
12530정성태2/4/202113043개발 환경 구성: 536. Wireshark + C#으로 확인하는 TCP 통신의 Receive Window
12529정성태2/4/202110140개발 환경 구성: 535. Wireshark + C#으로 확인하는 TCP 통신의 MIN RTO [1]
12528정성태2/1/20219532개발 환경 구성: 534. Wireshark + C#으로 확인하는 TCP 통신의 MSS(Maximum Segment Size) - 윈도우 환경
12527정성태2/1/20219759개발 환경 구성: 533. Wireshark + C#으로 확인하는 TCP 통신의 MSS(Maximum Segment Size) - 리눅스 환경파일 다운로드1
12526정성태2/1/20217606개발 환경 구성: 532. Azure Devops의 파이프라인 빌드 시 snk 파일 다루는 방법 - Secure file
12525정성태2/1/20217304개발 환경 구성: 531. Azure Devops - 파이프라인 실행 시 빌드 이벤트를 생략하는 방법
12524정성태1/31/20218345개발 환경 구성: 530. 기존 github 프로젝트를 Azure Devops의 빌드 Pipeline에 연결하는 방법 [1]
12523정성태1/31/20218373개발 환경 구성: 529. 기존 github 프로젝트를 Azure Devops의 Board에 연결하는 방법
12522정성태1/31/20219874개발 환경 구성: 528. 오라클 클라우드의 리눅스 VM - 9000 MTU Jumbo Frame 테스트
12521정성태1/31/20219886개발 환경 구성: 527. 이더넷(Ethernet) 환경의 TCP 통신에서 MSS(Maximum Segment Size) 확인 [1]
12520정성태1/30/20218406개발 환경 구성: 526. 오라클 클라우드의 VM에 ping ICMP 여는 방법
12519정성태1/30/20217518개발 환경 구성: 525. 오라클 클라우드의 VM을 외부에서 접근하기 위해 포트 여는 방법
12518정성태1/30/202124950Linux: 37. Ubuntu에 Wireshark 설치 [2]
12517정성태1/30/202112547Linux: 36. 윈도우 클라이언트에서 X2Go를 이용한 원격 리눅스의 GUI 접속 - 우분투 20.04
12516정성태1/29/20219214Windows: 188. Windows - TCP default template 설정 방법
12515정성태1/28/202110422웹: 41. Microsoft Edge - localhost에 대해 http 접근 시 무조건 https로 바뀌는 문제 [3]
12514정성태1/28/202110727.NET Framework: 1021. C# - 일렉트론 닷넷(Electron.NET) 소개 [1]파일 다운로드1
12513정성태1/28/20218738오류 유형: 698. electronize - User Profile 디렉터리에 공백 문자가 있는 경우 빌드가 실패하는 문제 [1]
12512정성태1/28/20218522오류 유형: 697. The program can't start because VCRUNTIME140.dll is missing from your computer. Try reinstalling the program to fix this problem.
12511정성태1/27/20218261Windows: 187. Windows - 도스 시절의 8.3 경로를 알아내는 방법
12510정성태1/27/20218662.NET Framework: 1020. .NET Core Kestrel 호스팅 - Razor 지원 추가 [1]파일 다운로드1
12509정성태1/27/20219609개발 환경 구성: 524. Jupyter Notebook에서 C#(F#, PowerShell) 언어 사용을 위한 환경 구성 [3]
12508정성태1/27/20218206개발 환경 구성: 523. Jupyter Notebook - Slide 플레이 버튼이 없는 경우
12507정성태1/26/20218330VS.NET IDE: 157. Visual Studio - Syntax Visualizer 메뉴가 없는 경우
12506정성태1/25/202111600.NET Framework: 1019. Microsoft.Tye 기본 사용법 소개 [1]
12505정성태1/23/20219366.NET Framework: 1018. .NET Core Kestrel 호스팅 - Web API 추가 [1]파일 다운로드1
... 31  32  33  34  35  36  37  38  39  40  41  42  43  [44]  45  ...