Added fread(...,data.table=getOption("datatable.fread.datatable")). FALSE returns data.frame.