function yxploti(xn,yn,ti,mes,x,y,c)
% function yxploti(xn,yn,ti,x,y,c)  
% plots y vs x and adds title and axis names
% Plots y vs x and adds a title and axis names.
% xn and yn are strings that give the names of the x and y variables.
% ti is a string that gives the title
% x and y are vectors of data to be plotted.
% mes message to be added to the plot
% this function "asks" for a plce to insert text and places it there.
%Example: xy=[1 2 3 4 5;2 4 8 4 1];
%        yxploti('x','y','y vs x','Here it is',xy(1,:),xy(2,:),'g')
plot(x,y,c)
title(ti)
xlabel(xn)
ylabel(yn)
disp('Point and click where you want the message to be placed.')
[x1,y1]=ginput(1);
text(x1,y1,mes)
