时间格式_总结

一、时间转化

# 生成一个数据表
null <- data.frame(x =1:10)

# 获取当前时间和日期
today <- Sys.time()  
today1 <- Sys.time() 
today_date <- Sys.Date()

# 将其他格式转化为日期
today_1 <- "201806-06"
today_2 <- "20180606-1120"
# 任意形状转变为日期
null$date <- as.Date(strptime(today_1,"%Y%m-%d"))
null$date <- as.POSIXct(strptime(today_1,"%Y%m%d-%H%M"))
# 日期转化为任意格式
null$date_1 <- format(as.POSIXlt(today),format="%Y%m%d-%H%M") 
# 日期相减
null$date_2 <- difftime(today1, today, tz,units = c("mins"))#("mins","auto", "secs", "mins", "hours","days", "weeks")

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值