Article Categories
- All Categories
-
Data Structure
-
Networking
-
RDBMS
-
Operating System
-
Java
-
MS Excel
-
iOS
-
HTML
-
CSS
-
Android
-
Python
-
C Programming
-
C++
-
C#
-
MongoDB
-
MySQL
-
Javascript
-
PHP
Selected Reading
How to find monthly sales using date variable in R?
Sales analysis requires to find monthly sales mean, total, range, and often standard deviation. This is mostly required by FMCG (Fast-Moving Consumer Goods) companies because they want to track their sales on daily basis as well as monthly basis. If we have daily sales data then we need to create another column for months in an R data frame to find the monthly sales and this can be done with the help of strftime and aggregate function.
Example
Consider the below data frame −
date<-c("2020/05/05","2020/05/05","2020/05/06","2020/06/10","2020/06/25",
+ "2020/06/25","2020/04/15","2020/05/25","2020/03/02","2020/02/25",
+ "2020/03/12","2020/02/21","2020/03/04","2020/04/21","2020/05/24",
+ "2020/02/17","2020/06/07","2020/04/08","2020/01/25","2020/01/04",
+ "2020/05/20","2020/01/24","2020/04/01")
sales<-c(17,25,14,19,21,24,26,28,18,25,26,18,19,25,20,17,10,18,26,27,21,24,18)
df<-data.frame(date,sales)
df
Output
date sales 1 2020/05/05 17 2 2020/05/05 25 3 2020/05/06 14 4 2020/06/10 19 5 2020/06/25 21 6 2020/06/25 24 7 2020/04/15 26 8 2020/05/25 28 9 2020/03/02 18 10 2020/02/25 25 11 2020/03/12 26 12 2020/02/21 18 13 2020/03/04 19 14 2020/04/21 25 15 2020/05/24 20 16 2020/02/17 17 17 2020/06/07 10 18 2020/04/08 18 19 2020/01/25 26 20 2020/01/04 27 21 2020/05/20 21 22 2020/01/24 24 23 2020/04/01 18 m.date<-strftime(df$date,"%m") Monthly_Sales_Mean<-aggregate(df$sales~m.date,FUN=mean) Monthly_Sales_Mean m.date df$sales 1 01 25.66667 2 02 20.00000 3 03 21.00000 4 04 21.75000 5 05 20.83333 6 06 18.50000 Monthly_Sales_Total<-aggregate(df$sales~m.date,FUN=sum) Monthly_Sales_Total m.date df$sales 1 01 77 2 02 60 3 03 63 4 04 87 5 05 125 6 06 74 Monthly_Sales_Range<-aggregate(df$sales~m.date,FUN=range) Monthly_Sales_Range m.date df$sales.1 df$sales.2 1 01 24 27 2 02 17 25 3 03 18 26 4 04 18 26 5 05 14 28 6 06 10 24 Monthly_Sales_SD<-aggregate(df$sales~m.date,FUN=sd) Monthly_Sales_SD m.date df$sales 1 01 1.527525 2 02 4.358899 3 03 4.358899 4 04 4.349329 5 05 5.115336 6 06 6.027714
Advertisements
