summaryrefslogtreecommitdiff
path: root/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.5.3
diff options
context:
space:
mode:
authorPrashant S2019-10-04 12:27:32 +0530
committerGitHub2019-10-04 12:27:32 +0530
commitac2986488a9731cff5cbb517d8f0ef98e2561d64 (patch)
tree7bb3f64824627ef179d5f341266a664fd0b69011 /Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.5.3
parentcbb2770fb2f88246175add29623103a56ba338b8 (diff)
parentb3f3a8ecd454359a2e992161844f2fb599f8238a (diff)
downloadR_TBC_Uploads-master.tar.gz
R_TBC_Uploads-master.tar.bz2
R_TBC_Uploads-master.zip
Merge pull request #1 from prashantsinalkar/masterHEADmaster
Added R TBC
Diffstat (limited to 'Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.5.3')
-rw-r--r--Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.5.3/Ex2.5_3.r14
1 files changed, 14 insertions, 0 deletions
diff --git a/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.5.3/Ex2.5_3.r b/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.5.3/Ex2.5_3.r
new file mode 100644
index 00000000..905de16e
--- /dev/null
+++ b/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.5.3/Ex2.5_3.r
@@ -0,0 +1,14 @@
+# Example : 3 Chapter : 2.5 Pageno : 83
+# Inverse of product of matrices
+E<-matrix(c(1,-5,0,0,1,0,0,0,1),ncol=3)
+E1<-solve(E)
+F<-matrix(c(1,0,0,0,1,-4,0,0,1),ncol=3)
+F1<-solve(F)
+print(F1)
+FE<-F%*%E
+print(FE)
+print("Inverse of FE ")
+FE1<-solve(FE)
+print(FE1)
+print("Inverse of FE can also be E-1*F-1 ")
+print(E1%*%F1)