fixed read.table in Rscript