如何生成精度到秒、分钟级的等差时间序列

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

目前，我只找到如何生成以天为精度的等差时间序列生成方法：

> seq(from=as.Date('2010-1-1'), to=as.Date('2010-1-30'), by=2)
[1] "2010-01-01" "2010-01-03" "2010-01-05" "2010-01-07" "2010-01-09"
[6] "2010-01-11" "2010-01-13" "2010-01-15" "2010-01-17" "2010-01-19"
[11] "2010-01-21" "2010-01-23" "2010-01-25" "2010-01-27" "2010-01-29"


但是如果我要以精度为小时、分钟、秒，或者任意秒为精度生成时间序列，该怎么做呢？

> seq(from=as.Date('2010-1-1 00:00:00', format='%Y-%m-%d %H:%M:%S'), to=as.Date('2010-1-30 00:00:00', format='%Y-%m-%d %H:%M:%S'), by=1)
[1] "2010-01-01" "2010-01-02" "2010-01-03" "2010-01-04" "2010-01-05"
[6] "2010-01-06" "2010-01-07" "2010-01-08" "2010-01-09" "2010-01-10"
[11] "2010-01-11" "2010-01-12" "2010-01-13" "2010-01-14" "2010-01-15"
[16] "2010-01-16" "2010-01-17" "2010-01-18" "2010-01-19" "2010-01-20"
[21] "2010-01-21" "2010-01-22" "2010-01-23" "2010-01-24" "2010-01-25"
[26] "2010-01-26" "2010-01-27" "2010-01-28" "2010-01-29" "2010-01-30"


尝试了上面这个，好像seq只认天为单位。

请教各位，谢谢啦

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：时间序列 format FORMA date form

换了一种方式，
> seq(from=Sys.time(), to=Sys.time()+100, by=5)
[1] "2017-12-20 11:11:16 CST" "2017-12-20 11:11:21 CST"
[3] "2017-12-20 11:11:26 CST" "2017-12-20 11:11:31 CST"
[5] "2017-12-20 11:11:36 CST" "2017-12-20 11:11:41 CST"
[7] "2017-12-20 11:11:46 CST" "2017-12-20 11:11:51 CST"
[9] "2017-12-20 11:11:56 CST" "2017-12-20 11:12:01 CST"
[11] "2017-12-20 11:12:06 CST" "2017-12-20 11:12:11 CST"
[13] "2017-12-20 11:12:16 CST" "2017-12-20 11:12:21 CST"
[15] "2017-12-20 11:12:26 CST" "2017-12-20 11:12:31 CST"
[17] "2017-12-20 11:12:36 CST" "2017-12-20 11:12:41 CST"
[19] "2017-12-20 11:12:46 CST" "2017-12-20 11:12:51 CST"
[21] "2017-12-20 11:12:56 CST"

这样可以自动以秒为精度实现等差序列

大家还有其他办法吗

时间的处理可以用一下lubridate包

1. library(lubridate)
   
2. 
   
3. # 从现在开始每隔10秒的序列
   
4. now() + dseconds(seq(0, 100, 10))
   
5. # output:
   
6. [1] "2017-12-21 21:37:22 CST" "2017-12-21 21:37:32 CST"
   
7. [3] "2017-12-21 21:37:42 CST" "2017-12-21 21:37:52 CST"
   
8. [5] "2017-12-21 21:38:02 CST" "2017-12-21 21:38:12 CST"
   
9. [7] "2017-12-21 21:38:22 CST" "2017-12-21 21:38:32 CST"
   
10. [9] "2017-12-21 21:38:42 CST" "2017-12-21 21:38:52 CST"
    
11. [11] "2017-12-21 21:39:02 CST"
    
12. 
    
13. # 从现在开始每隔1分钟的序列
    
14. now() + dminutes(1:10)
    
15. # output:
    
16. [1] "2017-12-21 21:39:19 CST" "2017-12-21 21:40:19 CST"
    
17. [3] "2017-12-21 21:41:19 CST" "2017-12-21 21:42:19 CST"
    
18. [5] "2017-12-21 21:43:19 CST" "2017-12-21 21:44:19 CST"
    
19. [7] "2017-12-21 21:45:19 CST" "2017-12-21 21:46:19 CST"
    
20. [9] "2017-12-21 21:47:19 CST" "2017-12-21 21:48:19 CST"
    
21. 
    
22. # 从今天开始每隔1天的序列
    
23. today() + ddays(1:5)
    
24. # output:
    
25. 2017-12-22 2017-12-23 2017-12-24 2017-12-25 2017-12-26
    
26. 
    
27. # 从今天开始每隔1周
    
28. today() + dweeks(1:5)
    
29. # output:
    
30. 2017-12-28 2018-01-04 2018-01-11 2018-01-18 2018-01-25
    
31. 
    
32. ...

复制代码

cheetahfly 发表于 2017-12-21 21:41

谢谢