ファイルをメモリに読み込むこともできます。
> buffer <- readLines ("tmp/file")
> buffer
[1] "0 0 0" "0 0 0"
[3] "" ""
[5] "54077 184965 81.25" "54266 184776 81.25"
[7] "" ""
[9] "65130 199986 82.1705426356589" "65513 199600 82.1705426356589"
データテーブルを含むファイルの一部に何らかの理由で属さないすべての行を削除または処理 (たとえば、測定番号、データセット名などを導出) します。
> buffer <- buffer [nzchar (buffer) > 0L]
> buffer
[1] "0 0 0" "0 0 0"
[3] "54077 184965 81.25" "54266 184776 81.25"
[5] "65130 199986 82.1705426356589" "65513 199600 82.1705426356589"
最後read.table
に、変更されたバッファーで使用します。
> read.table (textConnection (buffer))
V1 V2 V3
1 0 0 0.00000
2 0 0 0.00000
3 54077 184965 81.25000
4 54266 184776 81.25000
5 65130 199986 82.17054
6 65513 199600 82.17054