由买买提看人间百态

boards

本页内容为未名空间相应帖子的节选和存档,一周内的贴子最多显示50字,超过一周显示500字 访问原贴
Programming版 - 愚蠢到极点的R日期时间计算
相关主题
从apply句型的潜在危险看R语言的俚语风格Vert.x 好尴尬呀
a simple C++ question你大爷的夏日制!!
[合集] 统一的regex (grep, sed, awk, python,..)嵌入式(PLC)的时区问题
问个很基础的问题:C++的string美国人也说了,丝带杀F35跟杀猪差不多了
istream_iterator问题台湾同性恋游行示威
时间格式转换的问题Taiwan Could Lead Asia With Full Recognition of Gay Rights
c++ 怎么让一段程序每10秒钟run一次?今年大亚洲不参加amex shop small吗?
how to get time() result in millisecond precision? (转载)travel south asia
m*****n
2017-11-06 02:53:29
1
R设计日期时间的这帮人真是懒到了极点
根本没有把国际标准时间的日期和时间给分割的函数
于是我自己想办法分割,竟然也不对!
用的办法是造出来和原来标准时同一天的零点标准时
再相减
早上10点钟只过了零点2.5小时是什么鬼!
> mytime = as.POSIXlt("2010-11-21 10:30:40")
> timeorigin = as.POSIXlt(as.Date(mytime))
> format(mytime, '%Y-%m-%d %H:%M:%S' )
[1] "2010-11-21 10:30:40"
> format(timeorigin, '%Y-%m-%d %H:%M:%S' )
[1] "2010-11-21 00:00:00"
> mytime - timeorigin
Time difference of 2.511111 hours
> Sys.timezone()
[1] "Asia/Taipei"
R的铁杆粉们给解释解释?
m*****n
2017-11-06 02:58:10
2
> mytime
[1] "2010-11-21 10:30:40 CST"
> timeorigin
[1] "2010-11-21 UTC"
这又是什么鬼?自己改时区了?
d******c
2017-11-06 09:32:25
3
帮助里有,你没有看
?as.Date
## S3 method for class 'POSIXct'
as.Date(x, tz = "UTC", ...)
缺省使用了UTC
另外一般不要用POSIXlt, 应该用POSIXct
日期相关操作使用lubridate
> library(lubridate)
> mytime <- ymd_hms("2010-11-21 10:30:40")
> mytime
[1] "2010-11-21 10:30:40 UTC"
> hour(mytime)
[1] 10
> minute(mytime)
[1] 30
m******r
2017-11-06 09:50:40
4
你简直太牛逼了 什么都知道。
上回你给我的factor文档,我是来来回回看,自认为是个比较有耐心的人,还是看的云
里雾里。
R文档的缺点,我总结如下:
不是为实际应用设计的,说一些底层的东西,又没说透。 文风是想到哪里写到哪里。
建议:1. 看文档的时候,多想想自己以后怎么用它。
2. 实在看不懂,就算了。

【在 d******c 的大作中提到】
: 帮助里有,你没有看
: ?as.Date
: ## S3 method for class 'POSIXct'
: as.Date(x, tz = "UTC", ...)
: 缺省使用了UTC
: 另外一般不要用POSIXlt, 应该用POSIXct
: 日期相关操作使用lubridate
: > library(lubridate)
: > mytime <- ymd_hms("2010-11-21 10:30:40")
: > mytime

g****t
2017-11-06 10:34:33
5
招商银行现在好几个地方都是机器人回答常见问题。
文风还和老邢的机器人挺像,LoL
软件手册迟早也应该这样。

【在 m******r 的大作中提到】
: 你简直太牛逼了 什么都知道。
: 上回你给我的factor文档,我是来来回回看,自认为是个比较有耐心的人,还是看的云
: 里雾里。
: R文档的缺点,我总结如下:
: 不是为实际应用设计的,说一些底层的东西,又没说透。 文风是想到哪里写到哪里。
: 建议:1. 看文档的时候,多想想自己以后怎么用它。
: 2. 实在看不懂,就算了。

m******r
2017-11-06 11:08:05
6
现在连好多推销电话都是机器人的,你问问题,对方马上能回答出来,没有时间间隔,
和真人一样。 还能模仿人类的笑声,跟你small talk, 神了。 不过你多接几次电话,
发现她总是说:
'hahahaha...I forgot to put on my headset just now..I have a Caribbean
cruise coupon for you... '

【在 g****t 的大作中提到】
: 招商银行现在好几个地方都是机器人回答常见问题。
: 文风还和老邢的机器人挺像,LoL
: 软件手册迟早也应该这样。

m*****n
2017-11-07 02:13:54
7
谢谢
勉强可以分割了
> require(lubridate)
> now()-> thetime
> thetime - floor_date(thetime,"day") #得到difftime对象
虽然lubridate也有一些问题,例如识别不出CST时区

【在 d******c 的大作中提到】
: 帮助里有,你没有看
: ?as.Date
: ## S3 method for class 'POSIXct'
: as.Date(x, tz = "UTC", ...)
: 缺省使用了UTC
: 另外一般不要用POSIXlt, 应该用POSIXct
: 日期相关操作使用lubridate
: > library(lubridate)
: > mytime <- ymd_hms("2010-11-21 10:30:40")
: > mytime