在ggplot2中用年份注释第一个月
萨莎·埃斯普坎普
假设我有一个这样的情节：
DF <- data.frame(date=Sys.Date() - (-100):100, y=rnorm(201))
library("ggplot2")
library(scales)
ggplot(DF, aes(x=date, y=y)) +
geom_point() +
scale_x_date(breaks = "1 month", minor_breaks = "1 week", labels=date_format("%b"))
在这里，我希望每个月都包含主要行和标签，每周要包含次要行。这很好用，但现在我想将缩写月份的后一年包括在内，但仅在该情节中该年的第一个月。因此，标签应显示2014年9月。okt，nov，dec，jan，jan 2015，feb，mrt...。
这可能吗？
詹姆士
您可以使用自定义日期格式化程序来删除重复的年份：
my_date_format <- function()
{
function(x)
{
m <- format(x,"%b")
y <- format(x,"%Y")
ifelse(duplicated(y),m,paste(m,y))
}
}
ggplot(DF, aes(x=date, y=y)) +
geom_point() +
scale_x_date(breaks = "1 month", minor_breaks = "1 week", labels=my_date_format())
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
提取字符串列中遇到的第一个月的名字
- 2
标识值大于零的数据框中的第一个月
- 3
获取一个月的第一个星期一
- 4
获取一个月的第一个星期一
- 5
复制一个月的第一个文件
- 6
DateTime Symfony 第一个月是 12 月
- 7
如何在SQL Server中创建从去年的第一个月到当前月份执行的循环？
- 8
如何列出不在第一个月开始的12个月（循环）列表？
- 9
有效地将第一个月倒退
- 10
每月给定季度的第一个月的Python
- 11
根据第一个月售出的商品进行盘点
- 12
为“第一个月”的观察做单独的变量
- 13
所有分组的检索行都在第一个月
- 14
有效地将第一个月倒退
- 15
Java日历跳过第一个月
- 16
如何在excel中获取日期是否是一个月的第一个，第二个等星期一
- 17
如何使Quartz在第n个月的第一个月不中断地启动工作？
- 18
在出现特定值的熊猫数据框中获取第一个月和上个月
- 19
Flot Chart-如何使用minTickSize在x轴上显示第一个和最后一个月：[2，“ month”]
- 20
如何获得我所在时区可能的实际第一个月第一天？
- 21
如何获得我所在时区的实际第一个月第一天？
- 22
从一年的第一个月到一年中选定的月份的总和SQL
- 23
MySQL查询以获取具有日期字段的第一个月的最后一天的行
- 24
从一年的第一个月到每年的选定月份的总和SQL
- 25
应该如何使用joda-time来表示“每个季度的第一个月”？
- 26
应用apply.quarterly（）后，将每个季度的第一个月设置为索引
- 27
修剪ggplot2中的第一个和最后一个标签
- 28
在Python日期时间为什么是第一个月，“月”，= 1，但“星期一”，一周= 0的第一天？
- 29
在MongoDB数组中查询一个月
我来说两句