clear
disp('Transpose operation')
x = [1 ;3 ;7; -8]
pause
disp('transpose of x =')
x'
pause
disp('transpose of x times x = ')
x'*x
pause
disp(' x times transpose of x = ')
x*x'
pause
A = [ 2 7; 8 -1]
pause
B = [1 3 4; 7 8 9]
pause
disp( 'AB =')
A*B
pause
disp('transpose of AB = ')
(A*B)'
pause
disp(' transpose of B times transpose of A =')
B'*A'
pause
disp(' A\d implementation of least squares')
pause
A=[1 1; 2 1 ;3 1;4 1; 5 1;6 1]
pause
d = [78 85 90 96 104 113]'
pause
disp('ls_sol = A\d')
ls_sol = A\d
disp('Linear curve fit via least squares')
disp( 'y(x) = ls_sol(1)*x  +  ls_sol(2)')