fixed write.table so row.names=FALSE