Skip to content

Instantly share code, notes, and snippets.

@aurielfournier
Created August 24, 2018 18:54
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save aurielfournier/d1367666e0aa0693369b6376eeac11ea to your computer and use it in GitHub Desktop.
Save aurielfournier/d1367666e0aa0693369b6376eeac11ea to your computer and use it in GitHub Desktop.
library(ggplot2)
dat <- data.frame(group = c("a","a","b","b","c",'c'),
rate = c(65, 35, 80, 20, 40, 60),
pf = c("p","f","p","f","p","f"))
ggplot(data=dat,
aes(x=group, y=rate, fill=pf))+
geom_bar(stat="identity")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment