Question

使用R，当我查询sqlite数据库时，它返回一个日期字段作为double。

当我将其转换为日期字段时，它看起来不错，但我无法对其进行过滤。这是一个玩具示例

df <- data.frame(dbl = c(1408258800, 1409382000, 1324108800))
df$dt <- as.Date(df$dbl/(60*60*24), origin= '1970-01-01')

str(df)
# 'data.frame': 3 obs. of  2 variables:
#  $ dbl: num  1.41e+09 1.41e+09 1.32e+09
# $ dt : Date, format: "2014-08-17" "2014-08-30" "2011-12-17"

df[df$dbl==1408258800,]
#         dbl         dt
#1 1408258800 2014-08-17


df[df$dt=="2014-08-17",]
#[1] dbl dt 
#<0 rows> (or 0-length row.names)

   OR

df[df$dt==as.Date("2014-08-17"),]
#[1] dbl dt 
#<0 rows> (or 0-length row.names)

猜猜我在获取初始结果作为日期字段时遗漏了一些非常基本的东西或后续处理

TIA

Answer 1

as.Date要求将原点作为输入后的天数。但是，您传递十进制数字。因此：

as.numeric(df$dt[1])
#[1] 16299.29
as.numeric(as.Date("2014-08-17"))
#[1] 16299

这些并不相同。我认为as.Date.numeric应该以不同方式处理或发出警告，但这并不是一个错误。

改为使用整数除法：

df$dt <- as.Date(df$dbl %/% (60*60*24), origin= '1970-01-01')

df[df$dt==as.Date("2014-08-17"),]
#         dbl         dt
#1 1408258800 2014-08-17

无法过滤从数字转换的日期字段

1 个答案: