R pretty.Date 日期時間類的漂亮斷點

說明

當 min.n = 0 且隻有一個唯一的 x 時，計算大約 n+1 等距 ‘nice’ 值的序列，該序列覆蓋 x 中的值的範圍，長度可能為 1。

用法

## S3 method for class 'Date'
pretty(x, n = 5, min.n = n %/% 2, sep = " ", ...)
## S3 method for class 'POSIXt'
pretty(x, n = 5, min.n = n %/% 2, sep = " ", ...)

參數

x	類 "Date" 或 "POSIXt" 的對象(即 "POSIXct" 或 "POSIXlt" )。
n	給出所需間隔數的整數。
min.n	給出最小間隔數的非負整數。
sep	字符串，用作某些格式的分隔符(例如，月份和年份之間)。
...	與通用兼容性的進一步爭論，被忽略。

值

位置向量(適合類別)，屬性 "labels" 給出相應的格式化字符標簽，屬性 "format" 給出所使用的格式規範。

例子

## time-dependent ==> ignore diffs:
## IGNORE_RDIFF_BEGIN
pretty(Sys.Date())
pretty(Sys.time(), n = 10)
## IGNORE_RDIFF_END

pretty(as.Date("2000-03-01")) # R 1.0.0 came in a leap year

## time ranges in diverse scales:% also in ../../../../tests/reg-tests-1c.R
steps <- stats::setNames(,
    c("10 secs", "1 min", "5 mins", "30 mins", "6 hours", "12 hours",
      "1 DSTday", "2 weeks", "1 month", "6 months", "1 year",
      "10 years", "50 years", "1000 years"))
x <- as.POSIXct("2002-02-02 02:02")
lapply(steps,
       function(s) {
           at <- pretty(seq(x, by = s, length.out = 2), n = 5)
           attr(at, "labels")
       })

也可以看看

pretty 為默認方法。