lines = '255 330 280 215 220 223 255 235 222 315 380 280 260 270 410 310 250 275 275 280 275 300 360 270 290 300 260 280 285 295'
con = textConnection( lines )
avg = scan( con, quiet=TRUE )
close(con)
avg = avg/1000

lines = '010 020 100 010 040 000 020 030 020 030 010 040 020 050 150 100 040 030 030 040 030 040 000 010 020 010 010 020 010 010'
con = textConnection( lines )
range = scan( con, quiet=TRUE )
close(con)
range = range/1000

DF = data.frame( average=avg, range=range )