diff options
Diffstat (limited to 'Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH7/EX7.3.1')
| -rw-r--r-- | Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH7/EX7.3.1/Ex7.3_1.r | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH7/EX7.3.1/Ex7.3_1.r b/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH7/EX7.3.1/Ex7.3_1.r new file mode 100644 index 00000000..aee17518 --- /dev/null +++ b/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH7/EX7.3.1/Ex7.3_1.r @@ -0,0 +1,7 @@ +# Example : 1 Chapter : 7.3 Page No: 400 +# Diagonaliazation of matrix +A<-matrix(c(0.5,-0.5,-0.5,0.5),ncol=2) +ev<-eigen(A)$values +D<-matrix(c(ev[1],0,0,ev[2]),ncol=2) +print("The diagonialized matrix") +print(D)
\ No newline at end of file |