summaryrefslogtreecommitdiff
path: root/26/CH6/EX6.4.13/6_4_13.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /26/CH6/EX6.4.13/6_4_13.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '26/CH6/EX6.4.13/6_4_13.sce')
-rwxr-xr-x26/CH6/EX6.4.13/6_4_13.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/26/CH6/EX6.4.13/6_4_13.sce b/26/CH6/EX6.4.13/6_4_13.sce
new file mode 100755
index 000000000..a9834939f
--- /dev/null
+++ b/26/CH6/EX6.4.13/6_4_13.sce
@@ -0,0 +1,10 @@
+disp('QR decomposition of a matrix')
+disp('given matrix A=')
+a=[5 9;1 7;-3 -5;1 5]
+disp(a)
+disp('given matrix Q=')
+q=(1/6)*[5 -1;1 5;-3 1;1 3]
+disp(q)
+disp('Therefore, R=')
+s=q'*a
+disp(s) \ No newline at end of file