summaryrefslogtreecommitdiff
path: root/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.7.4
diff options
context:
space:
mode:
Diffstat (limited to 'Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.7.4')
-rw-r--r--Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.7.4/Ex2.7_4.r8
1 files changed, 8 insertions, 0 deletions
diff --git a/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.7.4/Ex2.7_4.r b/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.7.4/Ex2.7_4.r
new file mode 100644
index 00000000..f02ef37a
--- /dev/null
+++ b/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.7.4/Ex2.7_4.r
@@ -0,0 +1,8 @@
+# Example : 4 Chapter : 2.7 Pageno : 110
+# Product of matrix and its trnspose gives symmetric matrix
+R<-matrix(c(-1,0,1,-1,0,1),ncol=3)
+RT<-t(R)
+print("R * t(R)")
+print(R%*%RT)
+print("t(R) * R")
+print(RT%*%R) \ No newline at end of file