lines = 'Male Plumage_Index Behavioral_Index R 7 3 S 13 10 D 14 11 F 6 5 W 14 15 K 15 15 U 4 7 O 8 10 V 7 4 J 9 9 L 14 11' con = textConnection( lines ) DF = read.table( con, header=TRUE ) close(con)