R 将日期打印格式从yyyy-mm-dd更改为dd-mm-yyyy

R 将日期打印格式从yyyy-mm-dd更改为dd-mm-yyyy,r,date,R,Date,我正在尝试将日期格式从yyyy-mm-dd转换为dd-mm-yyyy格式。例如: D <- "06.12.2012" D <- as.Date(D, "%d.%m.%Y") D # [1] "2012-12-06" Da)解析 或 严格地说,你不能。Date是一个整数(自1970-01-01以来的天数),打印时看起来像字符串。Date对象的打印格式为YYYY-MM-DD,因为这是ISO-8601标准 如chat中所述,

我正在尝试将日期格式从
yyyy-mm-dd
转换为
dd-mm-yyyy
格式。例如:

D <- "06.12.2012"  
D <- as.Date(D, "%d.%m.%Y")
D
# [1] "2012-12-06"
Da)解析


严格地说,你不能。
Date
是一个整数(自1970-01-01以来的天数),打印时看起来像字符串。
Date
对象的打印格式为YYYY-MM-DD,因为这是ISO-8601标准

如chat中所述,您必须使用如下内容重新定义
print.Date
方法:

print.Date <- function(x, max=NULL, ...) {
  if (is.null(max)) 
    max <- getOption("max.print", 9999L)
  if (max < length(x)) {
    print(format(x[seq_len(max)], "%d-%m-%Y"), max = max, ...)
    cat(" [ reached getOption(\"max.print\") -- omitted", 
      length(x) - max, "entries ]\n")
  }
  else print(format(x, "%d-%m-%Y"), max = max, ...)
  invisible(x)
}

print.Date是的,但是被叫去开会了。生活有时会与这样的事情发生冲突,真可怕:)
   strftime(d, "%m-%d-%Y")
   format(d, "%m-%d-%Y")
print.Date <- function(x, max=NULL, ...) {
  if (is.null(max)) 
    max <- getOption("max.print", 9999L)
  if (max < length(x)) {
    print(format(x[seq_len(max)], "%d-%m-%Y"), max = max, ...)
    cat(" [ reached getOption(\"max.print\") -- omitted", 
      length(x) - max, "entries ]\n")
  }
  else print(format(x, "%d-%m-%Y"), max = max, ...)
  invisible(x)
}