在R的read.table（）中指定多字符注释标记

Question

是否有可能在R中指定一个由多于一个符号组成的注释字符？

例如，

read.table("data.dat", comment.char="//") 

不起作用。

Answer 1

我认为你不能，但这是一个解决方法。读取文件的函数，使用sub清除其行，并在将所有内容粘贴到read.table之前将其粘贴在一起：

my.read.table <- function(file, comment.char = "//", ...) {
  clean.lines <- sub(paste0(comment.char, ".*"), "", readLines(file))
  read.table(..., text = paste(clean.lines, collapse = "\n"))
   }

测试：

file <- textConnection("3 4 //a
                        1 2")
my.read.table(file)
#   V1 V2
# 1  3  4
# 2  1  2