I am trying to change the color or use a palette in this chart, but I don't know how to add the name palette from RColorBrewer.
#This is how I get the chart:
historic_data %>% group_by(date) %>%
summarise(n=n(),
comp_1 = (sales_1/total_sales)*100,
comp_2 = (sales_2/total_sales)*100,
comp_3 = (sales_3/total_sales)*100,
comp_4 = (sales_4/total_sales)*100) %>%
gather("Company", "value", - c(date, n)) %>%
ggplot(aes(x = date, y = value, group = Company, fill = Company)) + geom_col() +
labs(title = "Market Share",
x = "Date",
y = "%")+
theme_minimal()