gfspec = system.file("gz/demo.txt.gz", package="parimport")
fspec = system.file("txt/demo.txt", package="parimport")
rlchunk( gfspec, 3, 7 )
rlchunk( fspec, 2, 4, file )
mytx = function(recs) sapply(recs,
function(rec) strsplit(rec, "")[[1]][2], USE.NAMES=FALSE)
rlchunk( gfspec, 3, 7, txfun=mytx )Run the code above in your browser using DataLab