`fread`-ing文本文件，带有不规则的分隔符

Question

我需要读一个带有不规则分隔符的大（> 1GB）文本文件。 一个简化的例子如下：

1,1,1
1,1,1
...
1,1,1,1
1,1,1
...

不规则线（上面例子中的3个分隔符而不是2个）可能在第一千行之后出现。

read.table使用fill=TRUE和col.names 4个值。 fread with fill=TRUE无法读取不规则的线条。 添加col.names会导致错误。

MWE：

sometext  <-  "1,1,1"
fulltext  <-  paste(rep(sometext, 150), collapse="\n")
fulltext  <-  paste0(fulltext, "\n1,1,1,1") # Irregular line
fulltext  <-  paste0(fulltext, "\n1,1,1")

# Works
mwe.readtable  <- read.table(text=fulltext,
                            sep=",",
                            col.names = paste("V", 1:4, sep=""),
                            fill=TRUE)
# Fails w/ warning
mwe.fread  <- fread(fulltext,
                   sep =  ",",
                   fill=TRUE)

# Fails w/ error
mwe.fread2  <- fread(fulltext,
                   sep =  ",",
                   col.names = paste("V", 1:4, sep=""),
                   fill=TRUE)

有没有办法阻止data.table试图猜测最大分隔符数？