From 0999e6563cf0d9621ac8751e8c017691e6723c27 Mon Sep 17 00:00:00 2001
From: Cecil Singh <54638818+Cecilsingh@users.noreply.github.com>
Date: Thu, 3 Oct 2024 12:44:12 +1000
Subject: [PATCH] Create consumeResources.R

---
 hardwareTesting/consumeResources.R | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 hardwareTesting/consumeResources.R

diff --git a/hardwareTesting/consumeResources.R b/hardwareTesting/consumeResources.R
new file mode 100644
index 0000000..9c378be
--- /dev/null
+++ b/hardwareTesting/consumeResources.R
@@ -0,0 +1,10 @@
+#Create dataframe
+df <- data.frame(
+    x = c(1:1000000),
+    y = c(1:1000000)
+)
+
+for (i in c(1:500)) {
+    print(i)
+    fit <- lm(x ~ y, df)
+}