%% 
%%  The LaTeX Graphics Companion, 2ed (first printing May 2007)
%% 
%%  Example D-6-1 on page .
%% 
%%  Copyright (C) 2007 Michel Goossens, Frank Mittelbach, Denis Roegel, Sebastian Rahtz, Herbert Vo\ss 
%% 
%%  It may be distributed and/or modified under the conditions
%%  of the LaTeX Project Public License, either version 1.3
%%  of this license or (at your option) any later version.
%% 
%%  See http://www.latex-project.org/lppl.txt for details.
%% 

\documentclass{ttctexaplate}
\pagestyle{empty}
\setcounter{page}{6}
\setlength\textwidth{413.44133pt}
\StartShownPreambleCommands
\usepackage{pst-func,amsmath}
\StopShownPreambleCommands
\begin{document}
\psset{xunit=0.2cm,yunit=10cm}
\begin{pspicture*}(-1,-0.1)(61,0.5)
  \psaxes[Dx=5,dx=5\psxunit,Dy=0.2,dy=0.2\psyunit]{->}(60,0.48)
  \uput[-90](60,0){$k$} \uput[0](0,0.48){$P(X=k)$}
  \psBinomial[markZeros,linecolor={[cmyk]{0,1,0,0}}]{4}{.5}
  \psset{linewidth=1pt}
  \psBinomial[linecolor={[cmyk]{1,1,0,0}}]{5}{.5}
  \psBinomial[linecolor=blue!50]{10}{.5}
  \psBinomial[linecolor={[cmyk]{0,0,1,0.4}}]{20}{.5}
  \psBinomial[linecolor={[cmyk]{0.7,0,0.8,0}}]{50}{.5}
  \psBinomial[linecolor=cyan]{75}{.5}
  \rput[l](25,0.4){$P(k) = P(k-1)\cdot\dfrac{N-k+1}{k}\cdot\dfrac{p}{1-p}$}
  \rput[l](5,0.38){\color[cmyk]{0,1,0,0}$N=4;\, p=0.5$}
  \rput[l](5,0.3){\color[cmyk]{1,1,0,0}$N=5;\, p=0.5$}
  \rput[l](7,0.21){\color{blue!50}$N=10;\, p=0.5$}
  \rput[l](12,0.16){\color[cmyk]{0,0,1,0.4}$N=20;\, p=0.5$}
  \rput[l](25,0.14){\color[cmyk]{0.7,0,0.8,0}$N=50;\, p=0.5$}
  \rput[l](40,0.1){\color{cyan}$N=75;\, p=0.5$}
\end{pspicture*}
\end{document}