tab <- read.table(file, sep=" ", header=FALSE, comment.char="#", na.strings=".", stringsAsFactors=FALSE, quote="", fill=FALSE)