【发布时间】:2021-05-24 10:27:28
【问题描述】:
我目前正在创建一个日历 df 以加入我的其他 dfs,并最初按以下方式对其进行编码:
Date <- seq(as.Date("2020-01-01"), as.Date("2021-12-31"), by="days")
Calendar <- data.frame(Date)
Calendar$DateNo <- format(Calendar$Date, format = "%d")
Calendar$NameDay <- format(Calendar$Date, format = "%A")
Calendar$MonthNo <- format(Calendar$Date, format = "%m")
Calendar$NameMonth <- format(Calendar$Date, format = "%B")
Calendar$NameMonthShort <- format(Calendar$Date, format = "%b")
Calendar$Week <- format(Calendar$Date, format = "%V")
Calendar$Year <- format(Calendar$Date, format = "%Y")
Calendar$Quarter <- quarter(Calendar$Date, with_year = F, fiscal_start = 7)
Calendar$Month_Year <-paste(Calendar$NameMonthShort,Calendar$Year,sep="-")
Calendar$Quarter_Year <-paste(Calendar$Quarter,Calendar$Year,sep="-")
在将我的数据绘制到 ggplot 中出现一些问题后,我遇到了另一种使用 lubridate 包和 mutate 创建它的方法。我的新代码如下:
Date <- seq(as.Date("2020-01-01"), as.Date("2021-12-31"), by="days")
Calendar <- data.frame(Date)
Calendar <- Calendar %>%
mutate(
DateNo = day(Date),
NameDay = wday(Date,label = TRUE),
MonthNo = month(Date),
NameMonth = month(Date, label = TRUE),
NameMonthShort = month(Date, label = TRUE),
Week = week(Date),
Year = year(Date),
Quarter = quarter(Date, with_year = F, fiscal_start = 7))
我遇到的问题是我无法添加未缩写的日期/月份,并且不确定是否可以在 mutate 中添加 Month_Year/Quarter_Year 以便将值考虑在内。是否可以将这些值添加到或我必须像以前一样添加它们吗?谢谢!
【问题讨论】:
标签: r dataframe dplyr lubridate