导入带有日期标题的 csv

Question

• 我正在导入一个包含大量列的 excel csv 文件。每列用于不同的日期。例如1990年3月、1990年4月。
• 当我导入时，列标题被更改为数字，例如 34355、34356。
• 如何保留日期？

我尝试使用 r 工作室导入功能

sales <- read_csv("W:/Sales_data/sales.csv")

预期

First_Name Sir_name Region Jan_1980 Feb_1980 Mar_1980
George      Dell    LA      52        23      121
Lisa        Stevens NY                234     122
Peter       Hunt    TX      3242      12      123

实际

First_Name Sir_name Region  34524    34525    34526
George      Dell    LA      52        23      121
Lisa        Stevens NY                234     122
Peter       Hunt    TX      3242      12      123

任何帮助将不胜感激。

Answer 1

您需要将第一个作为数据而不是标头导入。然后，更改格式以匹配您想要的格式。最后，将第一行指定为列名，然后将其删除。

library(readr)
sales <- read_csv("W:/Sales_data/sales.csv", 
    col_names = FALSE)
sales[1,4:6] <- format(as.Date(sales[1,4:6], origin = "1899-12-30"), "%b_%Y")
colnames(sales) <- sales[1,]
sales <- sales[-1,]