lines = 'Year Supply Price 1999 11.2 1.70 2000 11.8 1.80 2001 11.5 2.00 2002 10.6 2.40 2003 11.2 2.50 2004 12.8 2.10 2005 13.1 2.00 2006 12.6 3.00 2007 14.5 4.20 2008 13.8 4.10' con = textConnection( lines ) DF = read.table( con, header=TRUE ) close(con)