barplot utilizzando ggplot2

Question

Ho una serie di dati come questo:

cars trucks suvs 
1   2 4 
3   5 4 
6   4 6 
4   5 6 
9   12 16 

sto cercando di disegnare un grafico a barre per questi dati. Attualmente, posso farlo con barplot:

barplot(as.matrix(autos_data), main="Autos", 
     ylab= "Total",beside=TRUE, col=rainbow(5)) 

Generazione di questo grafico:

Quindi le mie domande sono: Posso usare ggplot2 per disegnare un simile grafico? In particolare: come utilizzare la sfaccettatura o altre opzioni per dividere il grafico per giorni della settimana? Se sì, come posso farlo? Inoltre, come posso usare il facet per produrre un layout diverso?

Answer 1

Questo è stato chiesto molte volte prima. La risposta è che devi usare stat="identity" in geom_bar per dire a ggplot di non riepilogare i tuoi dati.

dat <- read.table(text=" 
cars trucks suvs 
1 2 4 
3 5 4 
6 4 6 
4 5 6 
9 12 16", header=TRUE, as.is=TRUE) 
dat$day <- factor(c("Mo", "Tu", "We", "Th", "Fr"), 
      levels=c("Mo", "Tu", "We", "Th", "Fr")) 

library(reshape2) 
library(ggplot2) 

mdat <- melt(dat, id.vars="day") 
head(mdat) 
ggplot(mdat, aes(variable, value, fill=day)) + 
    geom_bar(stat="identity", position="dodge")