R：如何在不复制 header 行的情况下将多张纸分组为一张？

Question

我在一个文件夹中有数百个包含数千行的电子表格，需要将它们分组到一个工作表中。我已经设法做到了这一点，但我最终复制了与 header 对应的第一行，并想删除这些行，只留下第一行（应该是 header） .

我将这些文件合并到一个 df 中的代码是：

setwd("~/Desktop/R studies/base1_rawsheets") #folder with spreadsheets
library(readxl)

data.files = list.files()

df <- readxl::read_excel(data.files[1], sheet=1) #reading the first file of list

for (file in data.files[-1]){
  newFile <- readxl::read_excel(file, sheet=1)
  df <- merge(df, newFile, all=T)
}

非常感谢您的帮助！

p.s.: 我使用的代码改编自此处的解决方案 How to read multiple excel sheets in R programming?

Answer 1

在第一个带有 [-1,] 的电子表格之后简单地删除每个捕获的 xlsx 的第一个观察结果。

df <- readxl::read_excel(data.files[1], sheet=1) #reading the first file of list

for (file in data.files[-1]){
  newFile <- readxl::read_excel(file, sheet=1)[-1,] ## Drops the first row
  df <- merge(df, newFile, all=T)
}

R：如何在不复制 header 行的情况下将多张纸分组为一张？

R: how to group multiple sheets into one without copying the header row?

excel

merge

r

worksheet