linly/Data-Science-Project
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

......

Browse Source 
Hello World
This commit is contained in:
ayousry42
2021-12-18 21:55:15 +02:00
parent 4e65805c54
commit c0fa1762d9
7 changed files with 49 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
.Rproj.user/ECAADC40/sources/s-910727FC/F34ED0EB-contents Normal file
View File

@@ -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