diff options
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.r | 8 |
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 |