直方图轴的中心刻度标记DATE

Question

在R中，我创建了每月数据点的直方图。我希望在条形图下居中显示刻度线，并保留月份/年份标签。任何帮助深表感谢！

我的代码是：

hist(d$date, "months", freq=TRUE, main="Number of locations by month", ylim=c(0,8000), xlab="Month", format = "%b %Y", xaxt="n") axis(side=1,at=d$mids, labels=???????????) 

Answer 1

这听起来像你期望hist在每月自动断开。事实并非如此。 hist试图做一个估算潜在密度函数的合理工作。这不一定是可视化计数。如果你愿意，你可以明确地设置参数breaks=。虽然这听起来更像是给我的barplot。以下是我可能会产生这样的情节

#sample data 
d<-data.frame(date=sample(seq.Date(as.Date("2001-01-01"), 
    as.Date("2001-12-31"), length.out=20), 30, replace=T)) 

#summarize data by months 
mybreaks=seq.Date(as.Date("2001-01-01"), as.Date("2002-01-01"), by="month") 
tt<-table(cut(d$date, breaks=mybreaks)) 
names(tt)<-strftime(mybreaks[-length(mybreaks)], format="%b %Y") 

#plot results 
barplot(tt)