write.table mod