So I write my data frame to a text file separated by tab.
write.table(data1, "newPatient.txt", sep="\\t"