summaryrefslogtreecommitdiff
path: root/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.2.a
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.2.a
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.2.a')
-rw-r--r--Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.2.a/Ex2_2.2a.r14
1 files changed, 14 insertions, 0 deletions
diff --git a/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.2.a/Ex2_2.2a.r b/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.2.a/Ex2_2.2a.r
new file mode 100644
index 00000000..f543583e
--- /dev/null
+++ b/Introduction_To_Linear_Algebra_by_Gilbert_Strang/CH2/EX2.2.a/Ex2_2.2a.r
@@ -0,0 +1,14 @@
+#Example : 2.2A Chapter : 2.2 page no : 50
+#Pivots and Multipliers in converting matrix to upper traingular system
+matrix(c(1,-1,0,-1,2,-1,0,-1,2),ncol=3)->A
+A
+print(paste("First pivot is",A[1,1]))
+l21<-A[2,1]/A[1,1]
+print(paste("Multiplier L21 to convert the second row first element to 0 is",l21))
+A[2,]<-A[2,]-l21*A[1,]
+A
+print(paste("The second pivot is ",A[2,2]))
+l32<-A[3,2]/A[2,2]
+A[3,]<-A[3,]-l32*A[2,]
+print("The equivalent Upper traingular system for the matrix A is ")
+A \ No newline at end of file