r - 强制 as.Date(as.yearqtr()) 的季度结束

Question

zoo 包中的

as.yearqtr() 似乎使用季度的开头:

library(zoo)
x <- "2015-05-17"
x <- as.Date(x)
x <- as.Date(as.yearqtr(x))
x

# [1] "2015-04-01"

我该如何把握季度末？

x

# [1] "2015-06-30"

谢谢!

Answer 1

使用frac = 1如图:

x <- as.Date("2015-05-17")
as.Date( as.yearqtr(x), frac = 1 )

给予:

[1] "2015-06-30"