2

Sys.time()出力の出力内のすべての数値を連結する、次のことを行うより効率的でエレガントな方法はありますか

x <- as.character(Sys.time())
paste0(substr(x,0,4),substr(x,6,7),substr(x,9,10),substr(x,12,13),substr(x,15,16),substr(x,18,20))

おそらく何らかの方法で貼り付けと折りたたみが含まれますが、その方法はわかりません...

4

3 に答える 3

7

フォーマットリテラルを使用して、オブジェクトを文字strftime()に変換するために使用できます。POSIXct

strftime(Sys.time(), "%Y%m%d%H%M%S")
[1] "20120910061602"

?strftime使用する文字列リテラルの詳細については、を参照してください。

于 2012-09-10T05:17:24.500 に答える
6

format私は最初の選択肢だと思っていたでしょう：

format(Sys.time(), "%Y%m%d%H%M%S")
[1] "20120909231732"
于 2012-09-10T06:19:31.463 に答える
4

数字以外の文字を削除することもできます。

gsub("[^0-9]","",x)
[1] "20120910151242"
于 2012-09-10T05:17:03.983 に答える