lines = 'District Spending_Per_Pupil Graduation_Rate Dighton_Rehoboth 10.0 88.7 Duxbury 10.2 93.2 Tyngsborough 10.2 95.1 Lynnfield 10.3 94.0 Southwick_Tolland 10.3 88.3 Clinton 10.8 89.9 Athol_Roya1ston 11.0 67.7 Tantasqua 11.0 90.2 Ayer 11.2 95.5 Adams_Cheshire 11.6 75.2 Danvers 12.1 84.6 Lee 12.3 85.0 Needham 12.6 94.8 New_Bedford 12.7 56.1 Springfield 12.9 54.4 Manchester_Essex 13.0 97.9 Dedham 13.9 83.0 Lexington 14.5 94.0 Chatham 14.7 91.4 Newton 15.5 94.2 Blackstone_Va11ey 16.4 97.2 Concord_Carlisle 17.5 94.4 Pathfinder 18.1 78.6 Nantucket 20.8 87.6 Essex 22.4 93.3 Provincetown 24.0 92.3' con = textConnection( lines ) DF = read.table( con, header=TRUE ) close(con)