summaryrefslogtreecommitdiff
path: root/70/CH3/EX3.3.1/3_3_1.sci
blob: d78ea2f5c9f2f6cb9843167b0cc3bc353f93d391 (plain)
1
2
3
4
5
6
7
8
9
10
11
//page 165
clear;
close;
clc;
A=rand(4,4);
disp(A,'A=');
P=A*inv(A'*A)*A';
disp('P=A*inv(A''*A)*A');
disp(P,'Projection of a  invertible 4x4 matrix on to the whole space is:');
disp('Its identity matrix.')
//end