用ggplot2缩小x轴

Question

我使用包ggplot2

获得了这个图

使用代码：

ggplot(count(c4l.tweets, "by.hour"), aes(x=by.hour, y=freq)) + geom_bar(stat="identity") + xlab("Number") + ylab("Date") + labs(title="#c4l13 tweets by the hour")

我想仅在第一个网格上缩小时间轴。 我试过了：

ggplot(count(subset(c4l.tweets, time > as.POSIXct("2013-02-12 09:00:00", tz="CST") & time    <   as.POSIXct("2013-04-14 12:00:00", tz="CST"), "by.hour"), aes(x=by.hour, y=freq)) + geom_bar(stat="identity") + xlab("Number") + ylab("Date") + labs(title="#c4l13 tweets by the hour")

但它不起作用，它给了我一个空白的图表......

而且，如果我想让它看起来像时间序列情节？我应该使用什么aestethic（即连接每个点）？

非常感谢mych，Vincenzo