data={{16,40},{17,41},{19,39},{18,49},{23,49},{24,51},{24,52},{24,60},{25,55},{25,56},{27,50},{29,52},{30,57},{31,61},{34,75},{36,70},{37,65}};

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