如何让POSIXct对象以指定格式显示日期时间？

将CSV中的日期时间数据导入R并转换为POSIXct对象时，指定的格式在转换后显示发生变化。使用format()函数可以转回原格式，但对象会变为字符型，无法保留POSIXct的时间属性。需求是保留POSIXct类型的同时指定显示格式，或者一次性设置全局默认的日期时间显示样式。

示例代码：

# 构造数据
df = data.frame(other_var = c("something", "else", "here"),
                date_time = c("6/5/2020 00:10:10", "6/6/2020 00:10:11", "6/7/2020 01:10:11"))

# 转换为POSIXct
df$date_time = as.POSIXct(df$date_time, format = "%m/%d/%Y %H:%M:%S", tz="UTC")
str(df$date_time) # 此时是POSIXct类型，但显示格式可能不符合预期

# 使用format转换后变为字符型
df$date_time = format(df$date_time, format = "%m/%d/%Y %H:%M:%S", tz="UTC")
str(df$date_time) # 类型变为character

方案1：全局设置POSIXct对象的默认显示格式 #

通过修改R的全局选项，可以指定所有POSIXct/POSIXlt对象的默认打印格式，且不会改变对象的类型。运行以下代码：

# 设置全局默认的POSIXct/POSIXlt显示格式
options(format.POSIXct = "%m/%d/%Y %H:%M:%S", 
        format.POSIXlt = "%m/%d/%Y %H:%M:%S")

验证效果 #

重新运行转换代码：

df = data.frame(other_var = c("something", "else", "here"),
                date_time = c("6/5/2020 00:10:10", "6/6/2020 00:10:11", "6/7/2020 01:10:11"))

df$date_time = as.POSIXct(df$date_time, format = "%m/%d/%Y %H:%M:%S", tz="UTC")

print(df$date_time) 
# 输出：[1] "6/5/2020 00:10:10" "6/6/2020 00:10:11" "6/7/2020 01:10:11"

str(df$date_time)
# 输出： POSIXct[1:3], format: "6/5/2020 00:10:10" "6/6/2020 00:10:11" "6/7/2020 01:10:11"

此时对象仍然是POSIXct类型，同时显示格式符合需求。

永久生效 #

如果希望每次启动R都自动应用该设置，可以将上述options()代码添加到你的.Rprofile文件中（该文件通常位于用户主目录下）。

方案2：自定义POSIXct对象的打印方法 #

如果需要更灵活的控制（比如针对特定对象设置不同格式），可以自定义print.POSIXct方法，但注意这会覆盖默认的打印行为：

print.POSIXct = function(x, ...) {
  print(format(x, "%m/%d/%Y %H:%M:%S"), ...)
}

运行后，所有POSIXct对象的打印都会使用指定格式，且保留原类型。

关键说明 #

• format()函数的作用是将日期时间对象转换为字符串，因此会改变对象类型；而修改全局选项或自定义打印方法只是改变对象的显示方式，不会改变其底层的POSIXct类型，仍然可以进行时间相关的计算和操作。
• 格式字符串的规则与strftime()一致，可以根据需求调整（比如添加时区显示%Z、12小时制%I等）。

内容的提问来源于stack exchange，提问作者Jade131621