0

as.Date为什么在 for 循环中使用这种（当然是非正统的）会产生意想不到的结果？

我有以下日期向量：

df.1 <- c("30-Sep-12", "30-Nov-12", "30-Sep-12", 
  "30-Nov-12", "30-Sep-12", "30-Nov-12", 
  "30-Sep-12")

现在当然要以标准日期格式获取它们，我可以使用

df.date <- as.Date(df.1, format="%d-%b-%y")

但在我的脚本的上下文中，我想使用一个for循环：

as.Date(df.1[6], format="%d-%b-%y")  # "30-Sep-12"
# [1] 2012-11-30  # as expected

df.for <- df.1
for (i in seq_along(df.1)){
df.for[i] <- as.Date(df.1[i], format="%d-%b-%y")
}
df.for[6]
# [1] 15674  # unexpected
4

1 回答 1

4

单个原子向量只能属于单个类

当您用于[<-替换 的单个值时df.for，R不能将那些未更改的值保存为看起来像 Dates 的“字符”变量和 Date 类值（一个像字符一样格式化和显示的数字）。因此，它强迫性格。

你可以通过制作df.for一个来解决这个问题list

例如

df.for <- as.list(df.1)
for (i in seq_along(df.1)){
  df.for[[i]] <- as.Date(df.1[i], format="%d-%b-%y")
}

或者通过在循环结束时将结果强制回日期（通过数字）

例如

df.for <- df.1
for (i in seq_along(df.1)){
  df.for[i] <- as.Date(df.1[i], format="%d-%b-%y")
}

as.Date(as.numeric(df.for),origin = '1970-01-01')
于 2013-07-10T04:17:23.227 回答