lines='Subject Before After 1 12.3 12.0 2 12.0 12.3 3 12.0 12.5 4 13.0 12.0 5 13.0 13.0 6 12.5 12.5 7 11.3 10.3 8 11.8 11.3 9 11.5 11.5 10 11.0 11.5 11 11.0 11.0 12 11.3 11.5' con = textConnection( lines ) DF = read.table( con, header=TRUE ) close(con) DF$Subject = NULL