xyjoin::usage = "Joins two lists into a form suitable for use with ListPlot.  To use, type>  xyjoin[xlist,ylist] "
xyjoin/: xyjoin[xlist_,ylist_] := Transpose[Table[{xlist,ylist}]]
