From c0fa1762d94ba8fb37059fc68ff1a5d388a17402 Mon Sep 17 00:00:00 2001
From: ayousry42 <ayousry42@gmail.com>
Date: Sat, 18 Dec 2021 21:55:15 +0200
Subject: [PATCH] ......

Hello World
---
 .Rproj.user/ECAADC40/sources/prop/28FC61B9    |  6 +++++
 .Rproj.user/ECAADC40/sources/prop/INDEX       |  1 +
 .../ECAADC40/sources/s-910727FC/F34ED0EB      | 26 +++++++++++++++++++
 .../sources/s-910727FC/F34ED0EB-contents      | 14 ++++++++++
 .../ECAADC40/sources/s-910727FC/lock_file     |  0
 .../shared/notebooks/patch-chunk-names        |  0
 Data.R                                        |  3 ++-
 7 files changed, 49 insertions(+), 1 deletion(-)
 create mode 100644 .Rproj.user/ECAADC40/sources/prop/28FC61B9
 create mode 100644 .Rproj.user/ECAADC40/sources/prop/INDEX
 create mode 100644 .Rproj.user/ECAADC40/sources/s-910727FC/F34ED0EB
 create mode 100644 .Rproj.user/ECAADC40/sources/s-910727FC/F34ED0EB-contents
 create mode 100644 .Rproj.user/ECAADC40/sources/s-910727FC/lock_file
 create mode 100644 .Rproj.user/shared/notebooks/patch-chunk-names

diff --git a/.Rproj.user/ECAADC40/sources/prop/28FC61B9 b/.Rproj.user/ECAADC40/sources/prop/28FC61B9
new file mode 100644
index 0000000..0072cef
--- /dev/null
+++ b/.Rproj.user/ECAADC40/sources/prop/28FC61B9
@@ -0,0 +1,6 @@
+{
+    "source_window_id": "",
+    "Source": "Source",
+    "cursorPosition": "13,20",
+    "scrollLine": "0"
+}
\ No newline at end of file
diff --git a/.Rproj.user/ECAADC40/sources/prop/INDEX b/.Rproj.user/ECAADC40/sources/prop/INDEX
new file mode 100644
index 0000000..abe7a34
--- /dev/null
+++ b/.Rproj.user/ECAADC40/sources/prop/INDEX
@@ -0,0 +1 @@
+~%2FGitHub%2FData-Science-Project%2FData.R="28FC61B9"
diff --git a/.Rproj.user/ECAADC40/sources/s-910727FC/F34ED0EB b/.Rproj.user/ECAADC40/sources/s-910727FC/F34ED0EB
new file mode 100644
index 0000000..bc302a1
--- /dev/null
+++ b/.Rproj.user/ECAADC40/sources/s-910727FC/F34ED0EB
@@ -0,0 +1,26 @@
+{
+    "id": "F34ED0EB",
+    "path": "~/GitHub/Data-Science-Project/Data.R",
+    "project_path": "Data.R",
+    "type": "r_source",
+    "hash": "0",
+    "contents": "",
+    "dirty": false,
+    "created": 1639857235111.0,
+    "source_on_save": false,
+    "relative_order": 1,
+    "properties": {
+        "source_window_id": "",
+        "Source": "Source",
+        "cursorPosition": "13,20",
+        "scrollLine": "0"
+    },
+    "folds": "",
+    "lastKnownWriteTime": 1639857261,
+    "encoding": "UTF-8",
+    "collab_server": "",
+    "source_window": "",
+    "last_content_update": 1639857261469,
+    "read_only": false,
+    "read_only_alternatives": []
+}
\ No newline at end of file
diff --git a/.Rproj.user/ECAADC40/sources/s-910727FC/F34ED0EB-contents b/.Rproj.user/ECAADC40/sources/s-910727FC/F34ED0EB-contents
new file mode 100644
index 0000000..38b696b
--- /dev/null
+++ b/.Rproj.user/ECAADC40/sources/s-910727FC/F34ED0EB-contents
@@ -0,0 +1,14 @@
+library(readxl)
+#grocery_entries <- read.csv(file.choose())
+grocery_entries <- read_excel("~/College/Data Science/Project/grc.xlsx")
+cash_credit <- cbind(grocery_entries[3], grocery_entries[8])
+#
+#sum_cash <-sum(cash_credit[which(cash_credit$paymentType=='Cash'),1])
+#sum_credit <-sum(cash_credit[which(cash_credit$paymentType=='Credit'),1])
+
+CompCashCredit <- c(sum_cash,sum_credit)
+#please visualise the data I am lazy - Sewelam
+ages <- cbind(grocery_entries[6] , grocery_entries[3])
+sum_ages <- aggregate(total ~ age,ages,sum)
+#First Github Commitment! 23
+#Yousri drinking tea
\ No newline at end of file
diff --git a/.Rproj.user/ECAADC40/sources/s-910727FC/lock_file b/.Rproj.user/ECAADC40/sources/s-910727FC/lock_file
new file mode 100644
index 0000000..e69de29
diff --git a/.Rproj.user/shared/notebooks/patch-chunk-names b/.Rproj.user/shared/notebooks/patch-chunk-names
new file mode 100644
index 0000000..e69de29
diff --git a/Data.R b/Data.R
index 5541b27..38b696b 100644
--- a/Data.R
+++ b/Data.R
@@ -10,4 +10,5 @@ CompCashCredit <- c(sum_cash,sum_credit)
 #please visualise the data I am lazy - Sewelam
 ages <- cbind(grocery_entries[6] , grocery_entries[3])
 sum_ages <- aggregate(total ~ age,ages,sum)
-#First Github Commitment! 23
\ No newline at end of file
+#First Github Commitment! 23
+#Yousri drinking tea
\ No newline at end of file