将多个.csv文件导入R并忽略只有标题的文件

Question

我有一个问题，我无法在网上和SO上找到答案。我想知道是否可以同时从多个目录中导入多个.csv文件，但忽略只有标题（第一行）且没有数据的文件？

这样的方法有效，但只有当所有文件都有数据时才会起作用：

all_csv = dir(dir, recursive=T, full.names=T, pattern="\\.csv$")

myfiles = lapply(all_csv,read.csv,sep=sep,dec=dec,stringsAsFactor=F,header=F,skip=1)

  for(i in 1:length(myfiles)){

    colnames(myfiles[[i]])[1:2] <- c("A","B")
        }

  combi <- do.call("rbind",myfiles)

更新：使用目标目录中包含的0个数据行（仅标题）的.csv文件，在第二个命令行返回错误：

Error in read.table(file = file, header = header, sep = sep, quote = quote,  : 
  no lines available in input

谢谢。