summaryrefslogtreecommitdiff
path: root/Numerical_Methods_by_E_Balaguruswamy/CH7/EX7.1/Ex7_1.R
diff options
context:
space:
mode:
authorPrashant S2019-10-04 12:27:32 +0530
committerGitHub2019-10-04 12:27:32 +0530
commitac2986488a9731cff5cbb517d8f0ef98e2561d64 (patch)
tree7bb3f64824627ef179d5f341266a664fd0b69011 /Numerical_Methods_by_E_Balaguruswamy/CH7/EX7.1/Ex7_1.R
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 'Numerical_Methods_by_E_Balaguruswamy/CH7/EX7.1/Ex7_1.R')
-rw-r--r--Numerical_Methods_by_E_Balaguruswamy/CH7/EX7.1/Ex7_1.R12
1 files changed, 12 insertions, 0 deletions
diff --git a/Numerical_Methods_by_E_Balaguruswamy/CH7/EX7.1/Ex7_1.R b/Numerical_Methods_by_E_Balaguruswamy/CH7/EX7.1/Ex7_1.R
new file mode 100644
index 00000000..31f25f49
--- /dev/null
+++ b/Numerical_Methods_by_E_Balaguruswamy/CH7/EX7.1/Ex7_1.R
@@ -0,0 +1,12 @@
+# Example 1 Chapter 7 Page no.: 211
+# Solving System of Equations
+
+#Define Sysytem of Equations in Matrix form
+A<-matrix(c(3,2,1,2,3,2,1,2,3),nrow = 3,ncol = 3,byrow = TRUE)
+A
+b<-matrix(c(10,14,14),nrow = 3,ncol = 1)
+b
+
+k <- solve(A,b)
+cat("Solution:\n x=",k[1],"\n y=",k[2],"\n z=",k[3])
+