States = textread('statenames.txt', '%s');
fid = fopen('line-black-pop.txt');
Data = fscanf(fid, '%g%g%g', [3,50]);
Data = 100* Data;
hold on
plot(Data(2,:), Data(1,:), 'x')
text(Data(2,:)+.1, Data(1,:), States)
axis([0, 40, 0, 15])
fit = polyfit(Data(2,:), Data(1,:), 1)
linex = [2, 38];
line(linex, fit(1)*linex+fit(2))

xlabel('State population % African-American','FontSize',16)
ylabel('% of election day news articles on "long lines"','FontSize',16)
title('State by state: Long lines at polling places vs. African-American population','FontSize',16)