我正在尝试在特定时间序列的最低点放置一个符号,我用ggplot的geom_line绘制了该符号。但是,geom_point没有显示在图上。通过跟随hadley的例子here(搜索'最高< - subset'来获得相关的赋值),我自己成功地使用geom_point来做这种事情,所以我非常清楚它可以完成。我只是不知道我在这里做了什么不同的事情导致它不显示。我猜这是一个直截了当的东西,比如一个缺失的论点或类似的东西 - 我认为这对于一双新鲜的眼睛来说很简单。
最小的例子如下:
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)
答案 0 :(得分:3)
如果添加美学,则会出现这一点:
thisplot + geom_point(
data = lowest,
aes(mydate, myval),
size = 5, colour = "red"
)