diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /75/CH9/EX9.16/ex_16.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '75/CH9/EX9.16/ex_16.sce')
-rwxr-xr-x | 75/CH9/EX9.16/ex_16.sce | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/75/CH9/EX9.16/ex_16.sce b/75/CH9/EX9.16/ex_16.sce new file mode 100755 index 000000000..7d2024183 --- /dev/null +++ b/75/CH9/EX9.16/ex_16.sce @@ -0,0 +1,23 @@ + // PG (624) + +A1 = [2 1 0;1 3 1;0 1 4] +lam = spec(A1)' +[Q1,R1] = qr(A1); +A2 = R1 * Q1 +[Q2,R2] = qr(A2); +A3 = R2 * Q2 +[Q3,R3] = qr(A3); +A4 = R3 * Q3 +[Q4,R4] = qr(A4); +A5 = R4 * Q4 +[Q5,R5] = qr(A5); +A6 = R5 * Q5 +[Q6,R6] = qr(A6); +A7 = R6 * Q6 +[Q7,R7] = qr(A7); +A8 = R7 * Q7 +[Q8,R8] = qr(A8); +A9 = R8 * Q8 +[Q9,R9] = qr(A9); +A10 = R9 * Q9 +[Q10,R10] = qr(A10);
\ No newline at end of file |