如何修复在R中加载excel文件时的日期错误

Question

x1 <- read_excel("path",sheet = 1,skip=1,col_names =TRUE, col_types = c("date","date","date","date","date","date","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess","guess"))
View(x1)

我试图加载一个R中有多列的excel表，由于某种原因，整个数据集的整个日期都是1899-12-31，因此无法继续。前四列应该在"；日期"；总体安排应该是2018-01-01、2018-01-02等等。我该如何解决这个问题？

Answer 1

对于r和excel的这个问题，您可以使用以下方法(答案会根据您使用的是windows还是mac而有所不同(：

在Windows上，对于日期(1901年之后(：

as.Date(43099, origin = "1900-01-01") # 2018-01-01
43099

在Mac上，对于日期(1904年后(：

as.Date(41639, origin = "1904-01-01") # 2018-01-01

从https://www.rdocumentation.org/packages/base/versions/3.6.2/topics/as.Date

as.Date(32768, origin = "1900-01-01")
## Excel is said to use 1900-01-01 as day 1 (Windows default) or
## 1904-01-01 as day 0 (Mac default), but this is complicated by Excel
## incorrectly treating 1900 as a leap year.
## (these values come from http://support.microsoft.com/kb/214330)