将R数据框架写入Excel文件，保持Excel的默认日期格式

Question

如果打开Excel2016的一个新实例并以以下格式输入日期( 8/15 )，它将在Excel中输出如下所示：

​

​

Excel的“格式”菜单将其标识为Custom > d-mmm。现在让我们继续讨论这个问题的R部分。我将创建一个简单的数据框架：

df <- data.frame(col1 = as.Date(c("2021-01-01", "2021-02-15")), col2 = c(3, 9))
#>         col1 col2
#> 1 2021-01-01    3
#> 2 2021-02-15    9

我想要将此数据帧写入Custom > d-mmm文件，而默认为 Excel的日期格式(如上文所示)。

我的第一次尝试是相当通用的，并且使用了writexl包：

library(writexl)
write_xlsx(df, "df.xlsx")

​

​

Excel最终将这些日期读取为Excel的yyyy-mm-dd格式，而不是我想要的Custom > d-mmm格式。让我变得更复杂一些，尝试使用openxlsx包来获得我想要的东西：

library(openxlsx)
options(xlsx.date.format = "d-mmm")
write.xlsx(df, file = "df.xlsx", asTable = TRUE)

​

​

这一次，输出采用Excel格式的Date > *3/14/2012。如何以Excel Custom > d-mmm格式在Excel中获得要识别的日期？输出将如下所示，不应涉及任何手动Excel步骤：

​

​

Answer 1

按照文档应用全局格式语法

options(openxlsx.dateFormat = "d-mmm")

文档：

https://rdrr.io/cran/openxlsx/man/openxlsx.html