lines = 'Subject Summer Winter
1 1458 1424
2 1353 1501
3 2209 1495
4 1804 1739
5 1912 2031
6 1366 934
7 1598 1401
8 1406 1339'
con = textConnection( lines )
DF = read.table( con, header=TRUE )
close(con)
DF$Subject = NULL