如何使用ggplot在直方图上创建时间戳，其中时间未在任一轴上绘制

Question

我想在mtcars数据集的直方图上创建一个时间戳，我正在绘制里程频率。

library(ggplot2)
ggplot(mtcars, aes(x=mpg, fill="red")) + geom_histogram(bins = 30) +  
 geom_vline(aes(xintercept=mean(mpg)),color="blue", linetype="dashed", 
 size=1) +theme(legend.position="top")   

Answer 1

喜欢这个吗？

ggplot(mtcars, aes(x=mpg, fill="red")) + geom_histogram(bins = 30) +  
 geom_vline(aes(xintercept=mean(mpg)),color="blue", linetype="dashed", 
 size=1) +theme(legend.position="top") +
 annotate("text", x = 30, y = 4, label = Sys.time())