From 3ff44982b86575dd8b3a7465fb787ea0be8aa788 Mon Sep 17 00:00:00 2001 From: Jimmyjr11 Date: Wed, 22 Dec 2021 12:46:03 +0200 Subject: [PATCH] Summed cities totals --- Data.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Data.R b/Data.R index a2aa6c4..6745ee2 100644 --- a/Data.R +++ b/Data.R @@ -19,8 +19,8 @@ CompCashCredit <- c(sum_cash,sum_credit) barplot(CompCashCredit,names.arg = c('Cash','Credit'),horiz = FALSE,col = c(rgb(0,1,0),rgb(1,0,0))) #City and Total Spent comparison -Jimmy - - +city_total <- cbind(grocery_entries[3], grocery_entries[7]) +sum_cities<-aggregate(total ~city ,city_total,sum)