lines='
A 14.6 13.8
B 17.3 15.4
C 10.9 11.3
D 12.8 11.6
E 16.6 16.4
F 12.2 12.6
G 11.2 11.8
H 15.4 15.0
I 14.8 14.4
J 16.2 15.0'
con = textConnection( lines )
DF = read.table( con, header=FALSE )
close(con)
colnames(DF) = c( 'Subject', 'Before', 'After' )
DF$Subject = NULL