data={2/5,1,1,3/5,4/5,3/5,1,1,2/5,1,1,1,1,4/5,1};

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