lines = 'Time xbar R
7:10_AM 5.23 0.9
1:40_PM 5.03 0.5
5:30_PM 4.20 0.9
9:45_PM 5.20 0.6
1:15_AM 5.40 1.0
2:10_AM 4.63 0.8
4:50_AM 5.10 0.5
6:45_AM 4.70 1.0
8:05_AM 3.97 0.9
10:00_AM 4.13 0.9
1:30_PM 4.50 0.1
5:00_PM 5.33 0.2
7:30_PM 5.00 0.8
12:05_AM 4.73 0.1
2:10_AM 5.23 0.8
5:20_AM 5.73 0.9
7:40_AM 5.90 1.0
9:40_AM 5.53 0.1
11:40_AM 4.90 0.5
1:30_PM 4.80 0.4
7:30_PM 5.20 0.5
10:50_PM 5.00 0.9
2:10_AM 5.70 1.0
4:10_AM 5.70 1.0
9:05_AM 5.03 0.7
11:40_AM 4.90 0.2
1:30_PM 3.93 0.4
5:30_PM 3.43 0.9
7:40_PM 2.93 0.4
11:30_PM 4.87 0.3
2:00_AM 5.30 0.5
4:20_AM 4.90 0.3'
con = textConnection( lines )
DF = read.table( con, header=TRUE )
close(con)