如何处理 R 中合并的列标题？答案

【问题标题】：How to deal with merged Column Headers in R?如何处理 R 中合并的列标题？
【发布时间】：2020-04-25 19:36:47
【问题描述】：

我是 R 语言的初学者，我一直在尝试将特定的 excel 工作表导入 R，但很难以适当的格式获取它。

这是我要导入的工作表的格式：

当我在 R 中导入此工作表时，它的外观如下：

有没有什么好的方法可以在 R 中格式化表格，所以我只能得到 1 个表格标题，每列都被命名：

Nissan.Altima、Nissan.Rogue、Nissan.GTR 等

我将 excel 表读入 R 的方法是使用 read_excel() 函数

感谢您的帮助

【问题讨论】：

【解决方案1】：

一种选择是使用skip = 1 读取数据以跳过第一行

library(readr)
df1 <- read_excel('file.xlsx', skip = 1)

然后用readLines读取第一行

lines <- scan(text = readLines('file.xlsx', n = 1), what = "", quiet = TRUE)
names(df1)[-1] <- paste0(names(df1)[-1], ".", rep(lines, c(4, 4, 2)))

【讨论】：