如何在r中重复数据帧的顺序

我希望执行与删除多个数据帧的第一行相同的顺序

lab1 <- lab1[-c(1),]
lab2 <- lab2[-c(1),]
lab3 <- lab3[-c(1),]
lab4 <- lab4[-c(1),]
lab5 <- lab5[-c(1),]
lab6 <- lab6[-c(1),]
lab7 <- lab7[-c(1),]
lab8 <- lab8[-c(1),]
lab9 <- lab9[-c(1),]
lab10 <- lab10[-c(1),]
...

---

lab1如何创建数据帧？是否可以改为列出
实验室[[i]]

否则，您可以将表达式编写为字符串，然后对其求值，但这有点老套，最好避免：

cmd <- paste0("lab", 1, "[c(-1),]")
eval(str2expression(cmd))

cmd谢谢！我用excel文件制作数据帧

lab1 <- readxl::read_excel(path="001.xlsx", sheet="sheet1", col_names=FALSE)
lab2 <- readxl::read_excel(path="002.xlsx", sheet="sheet1", col_names=FALSE)

lab1也许你可以试试下面的
list2env

list2env(
  lapply(mget(ls(pattern = "lab\\d+")), function(x) x[-1, ]),
  envir = .GlobalEnv
)

您需要
get（）
循环中的对象，然后
assign（）
将其分配给您的环境。
list2env(
  lapply(mget(ls(pattern = "lab\\d+")), function(x) x[-1, ]),
  envir = .GlobalEnv
)