fixed output of write.table