lines = 'Days_After_Injection Serum_Gold_Concentration
1 94.5
1 86.4
2 71.0
2 80.5
2 81.4
3 67.4
5 49.3
6 46.3
6 42.3
7 36.6'
con = textConnection( lines )
DF = read.table( con, header=TRUE )
close(con)