lines = 'State Average_SAT_Score
AK 911
MT 986
AL 1011
NE 1025
AZ 939
NV 913
AR 935
NH 924
CA 895
NJ 893
CO 969
NM 1003
CT 898
NY 888
DE 892
NC 860
DC 849
ND 1056
FL 879
OH 966
GA 844
OK 1019
HI 881
OR 927
ID 969
PA 879
IL 1024
RI 882
IN 876
SC 838
IA 1080
SD 1031
KS 1044
TN 1023
KY 997
TX 886
LA 1011
UT 1067
ME 883
VT 899
MD 908
VA 893
MA 901
WA 922
MI 1009
WV 921
MN 1057
WI 1044
MS 1013
WY 980
MO 1017'
con = textConnection( lines )
DF = read.table( con, header=TRUE )
close(con)