data={6,10,5,12,5,3,41,12,6,15,20,4,3,7,13,16,18,29,23,17};

Export["/Users/troyday/Desktop/Transfer/BB Chapter11/data.txt",data,"TSV"]