R:为什么我的 ggplot geom_point() 符号不可见？

Question

我试图在某个时间序列的最低点放置一个符号，我用 ggplot 的 geom_line 绘制了它。但是， geom_point 没有出现在图中。我之前按照hadley的例子成功地将geom_point用于这种事情here (搜索“最高<-子集”以获得相关分配)所以我很清楚它可以完成。我只是不知道我在这里做了什么不同的事情导致它不显示。我猜这是一些简单的事情，比如缺少的论点或类似的东西——我认为，这对一双新鲜的眼睛来说很容易。

最小示例如下:

require(ggplot2)
fstartdate <- as.Date('2009-06-01')

set.seed(12345)
x <- data.frame(mydate=seq(as.Date("2003-06-01"), by="month", length.out=103),myval=runif(103, min=180, max=800))
lowest <- subset(x, myval == min(x[x$mydate >= fstartdate,]$myval))

thisplot <- ggplot() +
    geom_line(data = x, aes(mydate, myval), colour = "blue", size = 0.7) +
    geom_point(data = lowest, size = 5, colour = "red")

print(thisplot)

Answer 1

如果您添加美感，这一点就会出现:

thisplot + geom_point(
  data = lowest, 
  aes(mydate, myval), 
  size = 5, colour = "red"
)