diff options
| author | Prashant S | 2019-10-04 12:27:32 +0530 |
|---|---|---|
| committer | GitHub | 2019-10-04 12:27:32 +0530 |
| commit | ac2986488a9731cff5cbb517d8f0ef98e2561d64 (patch) | |
| tree | 7bb3f64824627ef179d5f341266a664fd0b69011 /Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH6/EX6.2.1 | |
| parent | cbb2770fb2f88246175add29623103a56ba338b8 (diff) | |
| parent | b3f3a8ecd454359a2e992161844f2fb599f8238a (diff) | |
| download | R_TBC_Uploads-master.tar.gz R_TBC_Uploads-master.tar.bz2 R_TBC_Uploads-master.zip | |
Added R TBC
Diffstat (limited to 'Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH6/EX6.2.1')
| -rw-r--r-- | Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH6/EX6.2.1/Ex6.2_1.r | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH6/EX6.2.1/Ex6.2_1.r b/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH6/EX6.2.1/Ex6.2_1.r new file mode 100644 index 00000000..42b08fae --- /dev/null +++ b/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH6/EX6.2.1/Ex6.2_1.r @@ -0,0 +1,20 @@ +# Example : 1 Chapter : 6.2 Page No: 299
+# Diagonilizing a Matrix and Power of matrix computed from power of its diagonal matrix
+A<-matrix(c(1,0,5,6),ncol=2)
+lambda<-eigen(A)$values
+S<-eigen(A)$vectors
+S<-round(S)
+S1<-solve(S)
+Diag_matrix<-round(S1%*%A%*%S)
+print("Diagonal Matrix is ")
+print(Diag_matrix)
+A2<-A%*%A
+print("The square of matrix")
+print(A2)
+print("The Power of matrix can also be computed from its diagonal matrix as follows")
+A2_diag<-S%*%Diag_matrix%*%Diag_matrix%*%S1
+print("The square of matrix computed from its diagonal matrix")
+print(A2_diag)
+#The answer may slightly vary due to rounding off values
+#The answers provided in the text book may vary because of the computation process
+#Both answers are correct , here it is taken -Ax+b=0 , In the text book it is considered as Ax-b=0
\ No newline at end of file |