How to plot a performance/ rate graph ? in r


How to plot a performance/ rate graph ? in r



I am trying to plot a graph depicting the performance of the best selling items, moderate selling items and the least selling items and they show which particular brand they belong to and their respective sub_category + category



Raw Data :


sraw <- structure(list(Date = c("2018-02-28", "2018-02-28", "2018-02-28",
"2018-02-28", "2018-02-28", "2018-02-28"), Category = c("Bakery ",
"Household ", "Household ", "Personal care", "Personal care",
"Breakfast "), Sub_Category = c("Wafers ", "laundry ", "Pet Care",
"Womens grooming ", "Womens grooming ", "Instant food"), Product
= c("strawbery",
"washing powder ", "Cat food ", "sanitary pad ", "sanitary pad ",
"Noodles "), Brand = c("NO BRAND", "wheel ", "Whiskars", "whisper",
"whisper", "Yipee"), Day = c(28L, 28L, 28L, 28L, 28L, 28L), Month = c(2L,
2L, 2L, 2L, 2L, 2L), Year = c(2018L, 2018L, 2018L, 2018L, 2018L,
2018L), MRP = c("5", "48", "160", "34", "40", "45"), Quantity = c(2,
1, 1, 1, 1, 1), Sales = c(10, 48, 160, 34, 40, 45), Wday = c("Wednesday",
"Wednesday", "Wednesday", "Wednesday", "Wednesday", "Wednesday"
), Week = c(9L, 9L, 9L, 9L, 9L, 9L), X = c(NA, NA, NA, NA, NA,
NA), X. = c(NA, NA, NA, NA, NA, NA)), .Names = c("Date", "Category",
"Sub_Category", "Product", "Brand", "Day", "Month", "Year", "MRP",
"Quantity", "Sales", "Wday", "Week", "X", "X."), row.names = 870158:870163,
class = "data.frame")



Can anyone please guide me on how I can achieve this ?



MY attempt so far:
First transform the data, call it sraw6 like so


sraw6 <- sraw %>%
group_by(Year,Month,Brand) %>%
summarise_at(vars(Sales,Quantity), sum, na.rm = TRUE) %>%
mutate(Total = Sales)

ggplot(sraw6,aes(sraw6$Month,sraw6$Sales)) + stat_summary(fun.y="mean", geom="bar")

ggplot(sraw6,aes(x=reorder(sraw6$Brand,-
sraw6$Sales),y=sraw6$Sales,fill=sraw6$Brand)) + geom_bar(stat="identity")



Expected output similar to this :
enter image description here



but instead of markets and sales channels it would be : highest selling brand, least selling brand and moderate selling brand



Thanks





It's not clear from your sample data and problem statement what you actually want to plot. The image is way too low-res to identify anything; please clarify, what quantities you want to show (1) on the x and y axis, (2) on the different facets, (3) through different colours. It looks like you're after a bar chart? What have you tried so far? Please share your code!
– Maurits Evers
Jun 29 at 4:55






@MauritsEvers hi there! I have made further edits to the question, kindly check now. As for the problem statement: I need to show 3 graphs - each for a particular segment of the sales ( highest, least and moderate selling brands). On the x -axis it would be date( can be month/week) and Y axis would show sales
– 9minus4
Jun 29 at 11:11










By clicking "Post Your Answer", you acknowledge that you have read our updated terms of service, privacy policy and cookie policy, and that your continued use of the website is subject to these policies.

Comments

Post a Comment

Popular posts from this blog

paramiko-expect timeout is happening after executing the command

paramiko-expect timeout is happening after executing the command Can someone help me why timeout is happening after executing the command .I am trying to SSH to a machine and execute a command.I want to store the result of the executed command . I have referred paramiko-timeout but i didn't get my expected result. import traceback try: import paramiko except ImportError: raise Exception("Please install paramiko , pip install paramiko") import pexpect from paramiko_expect import SSHClientInteraction def main(): HOSTNAME = "minion5.net" USERNAME = "root" PASSWORD = "help@432" PROMPT = "root@*:~$s+" try: client = paramiko.SSHClient() client.load_system_host_keys() client.set_missing_host_key_policy(paramiko.AutoAddPolicy()) client.connect(hostname=HOSTNAME, username=USERNAME, password=PASSWORD) with SSHClientInteraction(client, timeout=20, display=True) as interact: ...
Read more

Export result set on Dbeaver to CSV

Export result set on Dbeaver to CSV Normally I use Dbeaver for windows and always export my result set like this: run my query --> select the result --> export the result set --> select export to clipboard --> done This step by step puts my result set in my clipboard and I can paste it wherever I want to work with it. The problem is that now I am using dbeaver for mac and this guide is not working. I can go on until the moment that I select my result set like in the image below: exporting data set But once I go further in the process, in the last step I get: no query Note that in "source" it was suppose to show the query that originated the result set, but instead it says just "select. As a result it does't select my result or anything (besides being "successful"). Normally my query would show up there automatically and I couldn't find any option that corrects this problem in the menus. Please help me! Thanks. Aft...
Read more

Opening a url is failing in Swift

Opening a url is failing in Swift breakpointing inside the callback and logging success shows false. I added itms-apps to my plist: LSApplicationQueriesSchemes and put this in my app delegate: func application(_ app: UIApplication, open url: URL, options: [UIApplicationOpenURLOptionsKey : Any] = [:]) -> Bool { return true } func moreTapped() { let url = NSURL(string: "itms-apps://itunes.com/developer/quantum-productions/id979315877") if #available(iOS 10.0, *) { UIApplication.shared.open(url! as URL, options: [:], completionHandler: {(success: Bool) in }) } else { UIApplication.shared.openURL(url! as URL) } } Are you testing on a real device? – rmaddy Jun 21 at 23:57 I try on a device, get "Cannot Connect to App Store". Device is online ...
Read more