将列名读取为日期格式

Question

我在 Excel 中的日期如下，第一个 col1作为字符和来自 col2至 col5是日期格式 (mm/dd/yyyy)

id   1/1/2016   2/1/2016  3/1/2016  4/1/2016  5/1/2016
1     23         545       33         55          66
2     454        536       66         80          11
3     83         585        9         10          19

我尝试使用 readxl 将上述文件导入到 R 中库，我的结果显示日期格式的列名在数据集中显示为数字，

如何导入相同格式的Excel日期列？

Answer 1

由于数据集是excel格式，我们可以用read_excel读取它然后将列名更改为其原始格式

library(readxl)
library(dplyr)
read_excel("yourdata.xlsx" %>% 
    setNames(., c('id', format(as.Date(as.numeric(names(.)[-1]), 
                   origin = '1899-12-30'), '%m/%d/%Y')))