diff --git a/Main.R b/Main.R
index e69de29..575693a 100644
--- a/Main.R
+++ b/Main.R
@@ -0,0 +1,5 @@
+loan_data <- read.csv("Loan_payments_data.csv", header = TRUE)
+
+CrossTable(loan_data$loan_status, loan_data$education, prop.r = TRUE, prop.c = TRUE)
+
+# New line to trigger Git. Use gmodels for CrossTable
\ No newline at end of file