diff options
author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /260/CH3/EX3.9/3_9.sce | |
parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip |
initial commit / add all books
Diffstat (limited to '260/CH3/EX3.9/3_9.sce')
-rw-r--r-- | 260/CH3/EX3.9/3_9.sce | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/260/CH3/EX3.9/3_9.sce b/260/CH3/EX3.9/3_9.sce new file mode 100644 index 000000000..3794e2167 --- /dev/null +++ b/260/CH3/EX3.9/3_9.sce @@ -0,0 +1,43 @@ +//Eg-3.9
+//pg-88
+
+clear
+clc
+
+ //cholesky decomposition
+
+ A=[1 .5 0;.5 1 .5;0 .5 1];
+ B=[1;2;3];
+
+
+[n,n]=size(A);
+summ1=0;
+summ2=0;
+
+for i=1:n
+ summ1=0;
+ for k=1:i-1
+ summ1=summ1+(L(i,k))^2;
+ end
+ L(i,i)=(A(i,i)-summ1)^(1/2);
+ for j=i+1:n
+ summ2=0;
+ for k=1:i-1
+ summ2=summ2+L(i,k)*L(j,k);
+ end
+ L(j,i)=(A(i,j)-summ2)/(L(i,i));
+ end
+end
+
+if L*L'==A then
+ disp("verification was done")
+end
+
+Y=inv(L)*B;
+
+X=inv(L')*Y;
+
+disp(X)
+
+
+
|