(x, y, yhat, legendStr)
if ~iscell(yhat), yhat = {yhat}; end
K = length(yhat);
xs = 0:0.1:1;
styles = {'k-.', 'bREPLACE_WITH_DASH_DASH', 'r-', 'g:'};
figure; hold on;
plot(x,y,'ko','linewidth',2)
h = [];
for i=1:K
  h(i) = plot(xs, yhat{i}, styles{i}, 'linewidth', 3, 'markersize', 10);
end
plotLegend(legendStr, h)
%axis_pct
set(gca,'ylim',[-6 4])
end

function plotLegend(legendStr, h)
if isOctave()
  legendStr = [{'Data'}, legendStr];
  legend(legendStr, 'location', 'east');
else
  legend(h, legendStr, 'loc