r - 在 R 中循环日期丢失格式

Question

这让我很沮丧。即使与 lubridate当我遍历它们时，我无法获得日期来保持它们的类型。例如:

require(lubridate)
yearrange = ymd(20110101) + years(seq(4))
yearrange
#[1] "2012-01-01 UTC" "2013-01-01 UTC" "2014-01-01 UTC" "2015-01-01 UTC"
class(yearrange)
#[1] "POSIXct" "POSIXt" 

但是，如果我尝试遍历年份(为数据集中的每一年创建一个单独的图): 我丢失了年份的格式，必须重新转换数据

for (yr in yearrange) { show(yr) }
#[1] 1325376000
#[1] 1356998400
#[1] 1388534400
#[1] 1420070400

如果我通过指定索引循环，我会返回日期对象:

for (i in seq(length(yearrange))) { show(yearrange[i]) }
#[1] "2012-01-01 UTC"
#[1] "2013-01-01 UTC"
#[1] "2014-01-01 UTC"
#[1] "2015-01-01 UTC"

有没有一种简单的方法来避免索引选项，而不使用 foreach ，或者这是唯一的方法？

Answer 1

尝试这个

for (yr in as.list(yearrange))  { show(yr) }

我想 for (yr in yearrange)强制 yearrange成一个向量和 POSIXct不是 vector 强制转换为支持的类型之一。