Eu quero criar um histograma com várias séries de dados no mesmo gráfico. O melhor método que posso encontrar para fazer isso émulthist(). Eu gostaria de um enredo em um estilo semelhante aohist(), e enquantoggplot() também pode ser usado para executar esta tarefa, o estilo de gráficos não é o que eu quero.

Aqui estão alguns dados de exemplo:

df <- structure(list(year = c(2011L, 2011L, 2011L, 2011L, 2011L, 2011L, 
2011L, 2011L, 2011L, 2011L, 2011L, 2011L, 2011L, 2011L, 2011L, 
2011L, 2011L, 2011L, 2011L, 2011L, 2011L, 2011L, 2011L, 2012L, 
2012L, 2012L, 2012L, 2012L, 2012L, 2012L, 2012L, 2012L, 2012L, 
2012L, 2012L, 2012L, 2012L, 2012L, 2012L, 2012L, 2012L, 2012L, 
2012L, 2012L, 2012L), count = c(187L, 199L, 560L, 1000L, 850L, 
400L, 534L, 911L, 390L, 1008L, 1173L, 1222L, 810L, 950L, 752L, 
1125L, 468L, 710L, 290L, 670L, 855L, 614L, 1300L, 950L, 670L, 
888L, 490L, 557L, 741L, 700L, 954L, 378L, 512L, 780L, 951L, 398L, 
1544L, 903L, 769L, 1399L, 1021L, 1235L, 1009L, 1222L, 255L)), .Names = c("year", 
"count"), class = "data.frame", row.names = c(NA, -45L))

E aqui está o código que eu usei até agora:

require(plotrix)
d2011<-df$count[df$year=="2011"]
d2012<-df$count[df$year=="2012"]
year<-list(d2011,d2012)
mh <- multhist(year, xlab="Count", ylab="Frequency", main="", cex.axis=1, col=c("dark gray", "light gray"), breaks=seq(0,1600, by=200))
box(bty="l", col="black")
legend.text<-c("2011","2012")
legend(locator(1), legend=legend.text, col=c("dark gray", "light gray"), pch=15, bty="n", cex=0.8)

Isso me fornece um histograma multipartidário 'barplot style', mas estou tendo problemas para alterar dois parâmetros gráficos.

Eu gostaria que o enredo se parecesse mais com um histograma e menos como um barplot, então, primeiro, quero remover (ou reduzir) o espaço entre as colunas. Eu tentei usarspace = NULL, mas este comando não parece funcionar com multist

Eu gostaria de alterar o eixo x para que as marcas de escala do eixo estejam presentes entre as barras no gráfico e o texto do eixo esteja alinhado com as marcas de escala, em vez de posicionado no ponto médio da barra. Eu tentei usaraxis(side=1, …), mas como os multististas usam objetos de lista para criar gráficos, esses comandos não parecem funcionar.

Qualquer sugestão seria muito apreciada. Sugestões para outros pacotes gráficos úteis que podem traçar histogramas com múltiplos conjuntos de dados também seriam bem-vindas.