data1={58,60,48,55,56,46,54,50,49,51,53,54,53};
data2={32,52,30,42,44,52,55,29,29,31,43,46,41,34,51,36,30};

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