lines = 'Ring_Lardner 48 1 Sinclair_Lewis 66 1 Raymond_Chand1er 71 1 Eugene_ONeill 65 1 Robert_Bench1ey 56 1 JP_Marquand 67 1 Dashiell_Hammett 67 1 EE_Cummings 70 1 Edmund_Wilson 77 1 Carl_Van_Doren 65 0 Ezra_Pound 87 0 Randolph_Bourne 32 0 Van_Wyck_Brooks 77 0 Samuel_Eliot_Morrison 89 0 John_Crowe_Ransom 86 0 TS_Eliot 77 0 Conrad_Aiken 84 0 Ben_Ames_Williams 64 0 Henry_Miller 88 0 Archibald_MacLeish 90 0 James_Thurber 67 0' con = textConnection( lines ) DF = read.table( con, header=FALSE ) close(con) colnames(DF) = c('Author', 'Age', 'Alcohol')