r - data.table::fread 文本中的新行问题

Question

我遇到了 data.table::fread 的问题。请参阅下面的第一个有问题的文件以及使用 fread 读取它的结果，第二个是正确读取的没有任何问题的文件。

# Test data.table::fread on following data with two new lines after Trust and before CEF
textProblem <- "Ticker;FullName;NorgateID;IsIndex;MarketID;Market;GroupID;Group;IndustryID;Industry;GicsID;GicsCategoryName;IcbID;IcbCategoryName;trbccode;trbcname;gicscode;gicsname;indexsymbol1;indexsymbol2;indexsymbol3;indexsymbol4;DelistingDate;PointValue;MarginDeposit;RoundLotSize;TickSize
TFA-200101;Morgan Stanley Dean Witter Municipal Income Trust

 CEF;265990;0;14;US Delisted Stocks;2;Investment Company;0;Unassigned or n/a;;;;;n/a;n/a;n/a;n/a;;;;;2001-01-23;1;0;0;0"

as.data.frame(data.table::fread(input=textProblem, sep=";", na.strings=c("Unassigned or n/a", "n/a", "{EMPTY}")))

textWorking <- "Ticker;FullName;NorgateID;IsIndex;MarketID;Market;GroupID;Group;IndustryID;Industry;GicsID;GicsCategoryName;IcbID;IcbCategoryName;trbccode;trbcname;gicscode;gicsname;indexsymbol1;indexsymbol2;indexsymbol3;indexsymbol4;DelistingDate;PointValue;MarginDeposit;RoundLotSize;TickSize
&6J_CCB;Japanese Yen Continuous Futures Backadjusted;687021;0;77;CME Group;32;Currency Futures;0;Unassigned or n/a;;;;;n/a;n/a;n/a;n/a;;;;;{EMPTY};125000;2200;1;5e-005"

as.data.frame(data.table::fread(input=textWorking, sep=";", na.strings=c("Unassigned or n/a", "n/a", "{EMPTY}")))

我系统上的输出：

> # Test data.table::fread on following data with two new lines after Trust and before CEF
> textProblem <- "Ticker;FullName;NorgateID;IsIndex;MarketID;Market;GroupID;Group;IndustryID;Industry;GicsID;GicsCategoryName;IcbID;IcbCategoryName;trbccode;trbcname;gicscode;gicsname;indexsymbol1;indexsymbol2;indexsymbol3;indexsymbol4;DelistingDate;PointValue;MarginDeposit;RoundLotSize;TickSize
+ TFA-200101;Morgan Stanley Dean Witter Municipal Income Trust
+ 
+  CEF;265990;0;14;US Delisted Stocks;2;Investment Company;0;Unassigned or n/a;;;;;n/a;n/a;n/a;n/a;;;;;2001-01-23;1;0;0;0"
> 
> as.data.frame(data.table::fread(input=textProblem, sep=";", na.strings=c("Unassigned or n/a", "n/a", "{EMPTY}")))
   V1     V2 V3 V4                 V5 V6                 V7 V8 V9 V10 V11 V12 V13 V14 V15 V16 V17 V18 V19 V20 V21        V22 V23 V24 V25 V26
1 CEF 265990  0 14 US Delisted Stocks  2 Investment Company  0 NA  NA  NA  NA  NA  NA  NA  NA  NA  NA  NA  NA  NA 2001-01-23   1   0   0   0
> 
> textWorking <- "Ticker;FullName;NorgateID;IsIndex;MarketID;Market;GroupID;Group;IndustryID;Industry;GicsID;GicsCategoryName;IcbID;IcbCategoryName;trbccode;trbcname;gicscode;gicsname;indexsymbol1;indexsymbol2;indexsymbol3;indexsymbol4;DelistingDate;PointValue;MarginDeposit;RoundLotSize;TickSize
+ &6J_CCB;Japanese Yen Continuous Futures Backadjusted;687021;0;77;CME Group;32;Currency Futures;0;Unassigned or n/a;;;;;n/a;n/a;n/a;n/a;;;;;{EMPTY};125000;2200;1;5e-005"
> 
> as.data.frame(data.table::fread(input=textWorking, sep=";", na.strings=c("Unassigned or n/a", "n/a", "{EMPTY}")))
   Ticker                                     FullName NorgateID IsIndex MarketID    Market GroupID            Group IndustryID Industry GicsID GicsCategoryName IcbID IcbCategoryName trbccode trbcname gicscode gicsname indexsymbol1 indexsymbol2
1 &6J_CCB Japanese Yen Continuous Futures Backadjusted    687021       0       77 CME Group      32 Currency Futures          0       NA     NA               NA    NA              NA       NA       NA       NA       NA           NA           NA
  indexsymbol3 indexsymbol4 DelistingDate PointValue MarginDeposit RoundLotSize TickSize
1           NA           NA            NA     125000          2200            1    5e-05

> sessionInfo()
R version 3.4.4 (2018-03-15)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Ubuntu 16.04.4 LTS

Matrix products: default
BLAS: /usr/lib/openblas-base/libblas.so.3
LAPACK: /usr/lib/libopenblasp-r0.2.18.so

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C               LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8     LC_MONETARY=en_US.UTF-8   
 [6] LC_MESSAGES=en_US.UTF-8    LC_PAPER=en_US.UTF-8       LC_NAME=C                  LC_ADDRESS=C               LC_TELEPHONE=C            
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

loaded via a namespace (and not attached):
[1] compiler_3.4.4    tools_3.4.4       yaml_2.1.19       data.table_1.11.2

标签： rdata.tablefread