install.packages("ggplot2")
install.packages("tidyverse")
install.packages("hrbrthemes")
install.packages("viridis")
library(ggplot2)
library(tidyverse)
library(hrbrthemes)
library(viridis)

setwd("/Users/ids37/Downloads")
data <-read.csv("datacategories.csv", sep=",")

View(data)
glimpse(data) 

bold.text <- element_text(face = "bold", color = "black")
bold.title <- element_text(face = "bold", color = "black", size = 16)

ggplot(data, aes(x=Categories, y=Values, fill=Metric)) + 
  geom_boxplot() +
  scale_fill_manual(values=c("#E69F00", "#56B4E9")) +
  theme(axis.text.x = bold.text, axis.text.y = bold.text, axis.title = bold.title)