r - 从csv文件的第一行删除其他符号？

Question

我有多个从成像软件导出的 csv 文件，但前三行是空白或在标题中重复“==”（我附上了一张图片以供参考）。

我已经弄清楚如何使用以下方法从最后一行检索值：

file_vec <- c(list.files('/path/to/files', 
                     full.names = TRUE, pattern = '\\.csv$'[-c(1)]))
dt_list <- lapply(file_vec, read.csv, stringsAsFactors = FALSE)
name_vec <- sub(".csv", "", file_vec)
dt_final <- data.frame(File = name_vec,
                   Value = sapply(dt_list, function(x) x[nrow(x), 2]),
                   stringsAsFactors = FALSE)

但这仅在我从 excel 中的 csv 文件中手动删除前三行然后将它们转换回 csv 后才有效。我尝试使用跳过功能和 lapply，但是当我使用 lapply 时，read.table由于前三行，它给了我一个错误。

任何帮助将不胜感激。作为参考，我的最终目标是从多个 csv 文件中提取第 4 列中的第 28 行和第 51 行。

标签： rcsvexport-to-csv