From a256f38a504ac30d5e6329cfbe8a32cad539448a Mon Sep 17 00:00:00 2001
From: noah <noah@theschricks.com>
Date: Sun, 26 Mar 2023 17:09:07 -0500
Subject: [PATCH] Matrix ops for 1

---
 Schrick-Noah_Homework-5.R | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/Schrick-Noah_Homework-5.R b/Schrick-Noah_Homework-5.R
index e094edf..5653495 100644
--- a/Schrick-Noah_Homework-5.R
+++ b/Schrick-Noah_Homework-5.R
@@ -5,8 +5,14 @@
 
 ## 1. Systems of Equations in Matrix Form
 # a. Use built-in R solve
+A <- matrix(c(2,3,4,3,2,-3,4,4,2),nrow=3)
+b <- matrix(c(3,5,9), nrow=3)
+
+x <- solve(A,b)
+x
 
 # b. Verify with matrix mult
+A%*%x == b
 
 ## 2. Matrix from polynomial
 # a. Create vector  for x and y