ggplot2注释，x轴中带有日期
罗科巴比
我正在尝试绘制一系列百分比值的面积图，在设定的时间内每天绘制一个。我想在图的顶部添加一个段，以更清楚地显示％下降的区域。
我尝试使用此代码（为简单起见，该示例仅包含几个数据点）：
library(ggplot2)
library(scales)
limit = c(0.85,0.87,0.88,0.90,0.72,0.74)
day <- as.Date(strptime((seq(20150201,20150206,1)),format = "%Y%m%d"))
dati = data.frame("Day" = day, "Limit" = limit)
g <- ggplot(data = dati, aes(Day, Limit))
g <- g + geom_area(fill = "dark red")
g <- g + coord_cartesian(ylim = c(0,1))
g <- g + scale_y_continuous(labels=percent)
g <- g + annotate("segment", y= 1, yend = 1, x = dati[3, "Day"], xend = dati[4, "Day"])
print(g)
但我收到此错误：错误：/未为“日期”对象定义
关于如何解决这个问题的任何想法？
我已经检查过如何在X轴上使用带有日期的ggplot2注释？，但错误似乎又回来了。另外，我想不使用lubridate软件包就这样做。
托尼托诺夫
将我先前的评论包装成一个答案：geom_segment改为使用。
+ geom_segment(y = 1, yend = 1,
x = as.numeric(dati[3, "Day"]), xend = as.numeric(dati[4, "Day"]))
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
ggplot2：R中带有scale_x_date轴的多因子箱线图
- 2
在ggplot2中格式化具有不同日期的x轴
- 3
在ggplot2 x轴中添加所有Year Month日期
- 4
在ggplot2的y轴上添加带有说明性注释的框
- 5
使用ggplot2将文本注释为x轴
- 6
ggplot2中的x轴格式
- 7
ggplot2中的x轴格式
- 8
ggplot2中带有下标的X标签
- 9
ggplot2：经典图，带有用于x和y轴的黑色标签
- 10
ggplot2：添加带有标签的第二个x轴
- 11
如何在ggplot2中移动x轴的刻度线（以年为单位的日期）？
- 12
ggplot x轴作为带有小时的日期
- 13
R：在x轴上带有日期时间的ggplot
- 14
从ggplot2中的ggplot x轴上删除NA
- 15
在plotly中复制带有刻面和箭头注释的ggplot2图表
- 16
扩展ggplot2中日期的轴范围
- 17
ggplot2 中的自定义日期轴
- 18
从ggplot2中的x轴删除空白行
- 19
ggplot2中x轴的顺序标签跟随数值
- 20
ggplot2中离散x轴的子组
- 21
ggplot2 X轴中的月份重新排序
- 22
ggplot2中x轴的顺序标签跟随数值
- 23
在ggplot2中订购x轴日值
- 24
R：带有ggupset和hrbrthemes :: theme_upsum（）的ggplot2图：x轴标签上出现多余的“ at”
- 25
在ggplot2中设置x轴的格式，其中日期重叠但不旋转，并插入换行符
- 26
如何在ggplot2中每3或6个月显示日期x轴标签
- 27
ggplot2-将水平线添加到带有x轴日期的多面图
- 28
带有重要性注释的ggplot2 geom_pointrange中按方面不同的颜色值
- 29
r：压缩ggplot2中的x轴（x轴是二进制值）
我来说两句