R: Examples for 'iotools::imstrsplit'

### ** Examples

  mm <- model.matrix(~., iris)
  f <- file("iris_mm.io", "wb")
  writeBin(as.output(mm), f)
  close(f)
  it <- imstrsplit("iris_mm.io", type="numeric", nsep="\t")
  iris_mm <- it$nextElem()
  print(head(iris_mm))

  [,1] [,2] [,3] [,4] [,5] [,6] [,7]
1    1  5.1  3.5  1.4  0.2    0    0
2    1  4.9  3.0  1.4  0.2    0    0
3    1  4.7  3.2  1.3  0.2    0    0
4    1  4.6  3.1  1.5  0.2    0    0
5    1  5.0  3.6  1.4  0.2    0    0
6    1  5.4  3.9  1.7  0.4    0    0

  ## remove iterator, connections and files
  rm("it")
  gc(FALSE)

          used (Mb) gc trigger (Mb) max used (Mb)
Ncells  641805 34.3    1099998 58.8  1099998 58.8
Vcells 5442476 41.6   10146329 77.5  5607820 42.8

  unlink("iris_mm.io")

Examples for 'iotools::imstrsplit'

Create an iterator for splitting binary or character input into a matrix