#!/bin/bash

:> code.m
declare -i i=0
declare -a list
exec <names 
while read line
do
	list[$i]=`echo $line`
	
	let "i=i+1"

done

declare size=${#list[@]}

for i in `seq 1 ${size}`
do
	n=$((i-1))
	echo "s(${i}).strings='${list[$n]}'" >> code.m
done

i=0
exec <x_econ
while read line
do
	list[$i]=`echo $line`
	
	let "i=i+1"

done

declare size=${#list[@]}

for i in `seq 1 ${size}`
do
	n=$((i-1))
	echo "x(${i})=${list[$n]}" >> code.m
done

i=0
exec <y_soci
while read line
do
	list[$i]=`echo $line`
	
	let "i=i+1"

done

declare size=${#list[@]}

for i in `seq 1 ${size}`
do
	n=$((i-1))
	echo "y(${i})=${list[$n]}" >> code.m
done


echo "figure(1); hold on" >> code.m
echo "for i=1:1:${size}" >> code.m
echo "		plot(x(i),y(i),'.r')" >> code.m
echo "		text(x(i)+0.05,y(i),s(i).strings(1:min(max(size(s(i).strings)),10)),'FontName','Arial','Color','blue','FontWeight','Bold','FontSize',16)" >> code.m
echo " end" >> code.m
echo "axis([-10 10 -10 10])" >> code.m
echo "grid on" >> code.m
echo "title('Trekbbs Political Map')" >> code.m