data={0.4,0.5,0.3,0.4,0.5,0.3,0.3,0.4,0.5,0.3,0.3,0.2,0.3,0.1};

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