我有一个这样的xlsx文件，第一行中有日期：
| 1月20日 | 2020年3月 | 2020年6月 |
|---|---|---|
| 一种 | ķ | 大号 |
| C | 和 | 乙 |
出于某些原因，使用readxl()函数导入R时，标头中的日期将转换为数字，例如：15890、17890等。
我知道将日期保留为变量不是一个好习惯，但是即使转置表格，问题仍然存在。如果有人可以帮助我，我感激不尽:)
我不确定您如何读取/写入数据，但是如果使用以下数据，则无法重现该数据：
df <- structure(list(`jan/20` = c("A", "C"), `mar/2020` = c("K", "Y"),
`jun/2020` = c("L", "B")), class = "data.frame", row.names = c(NA, -2L))
df
# jan/20 mar/2020 jun/2020
#1 A K L
#2 C Y B
#Write the data
writexl::write_xlsx(df, 'test.xlsx')
#Read the data
readxl::read_excel('test.xlsx')
# A tibble: 2 x 3
# `jan/20` `mar/2020` `jun/2020`
# <chr> <chr> <chr>
#1 A K L
#2 C Y B
您可以将数字日期更改为您选择的格式：
names(df) <- format(as.Date(as.numeric(names(df)),
origin = '1970-01-01'), '%b/%Y')
df
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句