DouKaku?beta

Comment detail

文字列型日時ののN秒後時間取得 (Nested Flatten) 
フォーマットが任意だと楽ちんでいいですね。

> DateEx("2008-09-02 00:00:00 JST", 30)
[1] "2008-09-02 00:00:30 JST"
> DateEx("2008-09-02 00:00:00 JST", -30)
[1] "2008-09-01 23:59:30 JST"

1
2
3
DateEx <- function(d1=Sys.time(), d2=0){
  as.POSIXct(d1) + d2
}

Index

Feed

Other

Link

Pathtraq

loading...
Creative Commons License このサイトの内容は、 クリエイティブ・コモンズ・ライセンスの下でライセンスされています。 [詳細]