将Excel导入R时保留首行空行失败的解决求助

方法1：使用readxl包（推荐） #

readxl包的read_excel()函数对空行的保留逻辑更贴合需求，无需额外设置就能完整保留首行空行及所有原始坐标：

library(readxl)
# col_names=FALSE表示不将首行作为列名，skip=0表示从第1行开始读取
df <- read_excel("你的文件路径.xlsx", col_names = FALSE, skip = 0)

方法2：基于openxlsx手动补全空行 #

如果必须使用openxlsx包，可以通过读取工作表维度信息，手动构建包含空行的数据框来还原原始坐标：

library(openxlsx)
file_path <- "你的文件路径.xlsx"
sheet_name <- getSheetNames(file_path)[1] # 获取第一个工作表名称

# 加载工作簿并获取工作表的原始行、列数
wb <- loadWorkbook(file_path)
max_row <- wb$sheets[[sheet_name]]$dimension$maxRow
max_col <- wb$sheets[[sheet_name]]$dimension$maxCol

# 创建与原始表维度一致的空数据框
full_df <- data.frame(matrix(NA, nrow = max_row, ncol = max_col))
# 读取现有数据（此时首行空行会被自动跳过）
read_data <- read.xlsx(file_path, skipEmptyRows = FALSE, skipEmptyCols = FALSE, colNames = FALSE)
# 将读取的数据填充到对应位置，保留首行空行
full_df[(max_row - nrow(read_data) + 1):max_row, ] <- read_data

方法3：使用XLConnect包 #

XLConnect对空行空列的支持更彻底，能直接完整读取所有内容：

library(XLConnect)
wb <- loadWorkbook("你的文件路径.xlsx")
# header=FALSE表示不将首行作为列名，直接读取所有行
df <- readWorksheet(wb, sheet = 1, header = FALSE)

注意：XLConnect依赖Java环境，使用前需确保你的R环境已配置好Java。

内容的提问来源于stack exchange，提问作者Grasshopper_NZ