inserted write.table(data, file="data_set.txt")