wynnSteps = 15; K = 393 + 2*wynnSteps + 1;
p=OccupationProbability(0.06,K);
WynnEpsilon(p(end-2*wynnSteps:end),wynnSteps,'series','on');
set(gca,'XTickMode','manual','XTick',[0 2 4 6 8 10 12 14],...
        'YTickMode','manual','YTick',[1e-18 1e-15 1e-12 1e-9 1e-6]);
set(gca,'FontSize',18,'FontWeight','normal','FontName','Times');
% print -deps2c wynnGraphik6.eps