作者热门文章
- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我有一个数字向量,表示自 1970 年 1 月 1 日以来的毫秒数。我想使用 lubridate 将它们转换为日期时间对象。数据示例如下:
raw_times <- c(1139689917479, 1139667123031, 1140364113915, 1140364951003,
1139643685434, 1139677091970, 1139691963511, 1140339448413, 1140368308429,
1139686613641, 1139666081813, 1140351488730, 1140346617958, 1141933663183,
1141933207579, 1140360125149, 1140351845108, 1140365079103, 1141933549825,
1140365601476)
知道 as_date
和 as_datetime
的文档表明它们采用一个数字向量来表示自 1970 年 1 月 1 日以来的天数,我尝试了以下方法:
library(lubridate)
as_date(raw_times / (1000 * 60 * 60 * 24))
"2006-02-11" "2006-02-11" "2006-02-19" "2006-02-19" "2006-02-11"
"2006-02-11" "2006-02-11" "2006-02-19" "2006-02-19" "2006-02-11"
"2006-02-11" "2006-02-19" "2006-02-19" "2006-03-09" "2006-03-09"
"2006-02-19" "2006-02-19" "2006-02-19" "2006-03-09" "2006-02-19"
(显然是利用这样的事实:一秒有 1000 毫秒,一分钟有 60 秒,一小时有 60 分钟,一天有 24 小时。)
当我使用 as_datetime
运行相同的代码时,我得到以下结果:
as_datetime(raw_times / (1000 * 60 * 60 * 24))
"1970-01-01 03:39:50 UTC" "1970-01-01 03:39:50 UTC" "1970-01-01 03:39:58 UTC" "1970-01-01 03:39:58 UTC" "1970-01-01 03:39:50 UTC" "1970-01-01 03:39:50 UTC"
"1970-01-01 03:39:50 UTC" "1970-01-01 03:39:58 UTC" "1970-01-01 03:39:58 UTC" "1970-01-01 03:39:50 UTC" "1970-01-01 03:39:50 UTC" "1970-01-01 03:39:58 UTC"
"1970-01-01 03:39:58 UTC" "1970-01-01 03:40:16 UTC" "1970-01-01 03:40:16 UTC" "1970-01-01 03:39:58 UTC" "1970-01-01 03:39:58 UTC" "1970-01-01 03:39:58 UTC"
"1970-01-01 03:40:16 UTC" "1970-01-01 03:39:58 UTC"
结果不同。我假设还有一些我缺少的其他参数,但我在文档中找不到任何可以告诉我那是什么的东西。
以下 session 信息:
> sessionInfo()
R version 3.3.2 (2016-10-31)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows 7 x64 (build 7601) Service Pack 1
locale:
[1] LC_COLLATE=English_United States.1252 LC_CTYPE=English_United States.1252 LC_MONETARY=English_United States.1252 LC_NUMERIC=C
[5] LC_TIME=English_United States.1252
attached base packages:
[1] stats graphics grDevices utils datasets methods base
other attached packages:
[1] lubridate_1.6.0
loaded via a namespace (and not attached):
[1] magrittr_1.5 tools_3.3.2 stringi_1.1.2 stringr_1.1.0
最佳答案
不是(包名称已编辑)解决方案,但您可以使用 base::.POSIXct
来实现此目的:
R> options(digits.secs=3)
R> .POSIXct(raw_times/1000)
[1] "2006-02-11 14:31:57.479 CST" "2006-02-11 08:12:03.030 CST"
[3] "2006-02-19 09:48:33.914 CST" "2006-02-19 10:02:31.003 CST"
[5] "2006-02-11 01:41:25.434 CST" "2006-02-11 10:58:11.970 CST"
[7] "2006-02-11 15:06:03.510 CST" "2006-02-19 02:57:28.413 CST"
[9] "2006-02-19 10:58:28.428 CST" "2006-02-11 13:36:53.641 CST"
[11] "2006-02-11 07:54:41.812 CST" "2006-02-19 06:18:08.730 CST"
[13] "2006-02-19 04:56:57.957 CST" "2006-03-09 13:47:43.183 CST"
[15] "2006-03-09 13:40:07.578 CST" "2006-02-19 08:42:05.148 CST"
[17] "2006-02-19 06:24:05.108 CST" "2006-02-19 10:04:39.102 CST"
[19] "2006-03-09 13:45:49.825 CST" "2006-02-19 10:13:21.476 CST"
关于r - 润滑 as_date 和。 as_datetime 行为差异,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/40959726/
我有一个数字向量,表示自 1970 年 1 月 1 日以来的毫秒数。我想使用 lubridate 将它们转换为日期时间对象。数据示例如下: raw_times sessionInfo() R ver
我有一个大数据集,其中包含事件时间和日期的单独列。我最终创建了一个大师 dttm将时间和日期放在一起的对象,但是当我尝试根据日期进行过滤时遇到了麻烦。这是一个反射(reflect)我自己的示例数据集:
我是一名优秀的程序员,十分优秀!