# NOT RUN {
orig.dir <- getwd(); setwd(tempdir()); # move to temporary dir
mat <- (generate.test.matrix(5)); prv(mat)
lst <- (generate.test.matrix(5,3,big.matrix=TRUE,file.name="bigtest"))
mat <- lst[[1]]; prv(mat); headl(lst[2:3]);
unlink(unlist(lst[2:3]))
setwd(orig.dir) # reset working dir to original
# }
Run the code above in your browser using DataLab