Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- g1 <- ggplot(data=k, aes(x = toupper(app), y = norm, fill = metric)) +
- geom_bar(stat = "identity", width=.5, colour = "black", size = 1) +
- theme_bw(base_size = 50) +
- scale_y_continuous(breaks=seq(0, 100, 20)) +
- scale_fill_manual(values=c("#7CC46D", "#CA6F5A", "#BF7FCA", "#5F9AD2", "#F6A560")) +
- labs(x = "", y = "Instruction Distribution (%)", fill="Instructions") +
- theme(
- panel.grid = element_blank(),
- legend.position="top",
- # legend.position="none",
- legend.direction = "horizontal",
- legend.title = element_blank(),
- legend.key.width = unit(2, "cm"),
- axis.ticks = element_line(colour = "black"),
- panel.border = element_rect(colour = "black"),
- axis.text=element_text(colour = "black", size=75),
- axis.title=element_text(size=45),
- # axis.text.x = element_text(angle = 90),
- legend.text=element_text(size=55),
- axis.title.y = element_blank(),
- # legend.box.margin = margin(b = -1.5, unit="cm"),
- # plot.margin = unit(c(0,0,6.5,0),"cm")
- )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement