Warning message: In scan(file = file, what = what, sep = sep, quote = quote, dec = dec, : EOF within quoted string
tab <- read.table(file, sep="\t", header=FALSE, comment.char="#",
na.strings=".", stringsAsFactors=FALSE,
quote="", fill=FALSE)