diff options
Diffstat (limited to 'gsl-1.9/doc/rand-hypergeometric.tex')
| -rw-r--r-- | gsl-1.9/doc/rand-hypergeometric.tex | 592 |
1 files changed, 592 insertions, 0 deletions
diff --git a/gsl-1.9/doc/rand-hypergeometric.tex b/gsl-1.9/doc/rand-hypergeometric.tex new file mode 100644 index 0000000..63ba8b2 --- /dev/null +++ b/gsl-1.9/doc/rand-hypergeometric.tex @@ -0,0 +1,592 @@ +% GNUPLOT: plain TeX with Postscript +\begingroup + \catcode`\@=11\relax + \def\GNUPLOTspecial{% + \def\do##1{\catcode`##1=12\relax}\dospecials + \catcode`\{=1\catcode`\}=2\catcode\%=14\relax\special}% +% +\expandafter\ifx\csname GNUPLOTpicture\endcsname\relax + \csname newdimen\endcsname\GNUPLOTunit + \gdef\GNUPLOTpicture(#1,#2){\vbox to#2\GNUPLOTunit\bgroup + \def\put(##1,##2)##3{\unskip\raise##2\GNUPLOTunit + \hbox to0pt{\kern##1\GNUPLOTunit ##3\hss}\ignorespaces}% + \def\ljust##1{\vbox to0pt{\vss\hbox to0pt{##1\hss}\vss}}% + \def\cjust##1{\vbox to0pt{\vss\hbox to0pt{\hss ##1\hss}\vss}}% + \def\rjust##1{\vbox to0pt{\vss\hbox to0pt{\hss ##1}\vss}}% + \def\stack##1{\let\\=\cr\tabskip=0pt\halign{\hfil ####\hfil\cr ##1\crcr}}% + \def\lstack##1{\hbox to0pt{\vbox to0pt{\vss\stack{##1}}\hss}}% + \def\cstack##1{\hbox to0pt{\hss\vbox to0pt{\vss\stack{##1}}\hss}}% + \def\rstack##1{\hbox to0pt{\vbox to0pt{\stack{##1}\vss}\hss}}% + \vss\hbox to#1\GNUPLOTunit\bgroup\ignorespaces}% + \gdef\endGNUPLOTpicture{\hss\egroup\egroup}% +\fi +\GNUPLOTunit=0.1bp +\GNUPLOTpicture(3600,2376) +{\GNUPLOTspecial{" +%!PS-Adobe-2.0 EPSF-2.0 +%%Title: rand-hypergeometric.tex +%%Creator: gnuplot 4.0 patchlevel 0 +%%CreationDate: Wed Aug 31 12:38:29 2005 +%%DocumentFonts: +%%BoundingBox: 0 0 360 237 +%%Orientation: Landscape +%%EndComments +/gnudict 256 dict def +gnudict begin +/Color false def +/Solid false def +/gnulinewidth 5.000 def +/userlinewidth gnulinewidth def +/vshift -33 def +/dl {10.0 mul} def +/hpt_ 31.5 def +/vpt_ 31.5 def +/hpt hpt_ def +/vpt vpt_ def +/Rounded false def +/M {moveto} bind def +/L {lineto} bind def +/R {rmoveto} bind def +/V {rlineto} bind def +/N {newpath moveto} bind def +/C {setrgbcolor} bind def +/f {rlineto fill} bind def +/vpt2 vpt 2 mul def +/hpt2 hpt 2 mul def +/Lshow { currentpoint stroke M + 0 vshift R show } def +/Rshow { currentpoint stroke M + dup stringwidth pop neg vshift R show } def +/Cshow { currentpoint stroke M + dup stringwidth pop -2 div vshift R show } def +/UP { dup vpt_ mul /vpt exch def hpt_ mul /hpt exch def + /hpt2 hpt 2 mul def /vpt2 vpt 2 mul def } def +/DL { Color {setrgbcolor Solid {pop []} if 0 setdash } + {pop pop pop 0 setgray Solid {pop []} if 0 setdash} ifelse } def +/BL { stroke userlinewidth 2 mul setlinewidth + Rounded { 1 setlinejoin 1 setlinecap } if } def +/AL { stroke userlinewidth 2 div setlinewidth + Rounded { 1 setlinejoin 1 setlinecap } if } def +/UL { dup gnulinewidth mul /userlinewidth exch def + dup 1 lt {pop 1} if 10 mul /udl exch def } def +/PL { stroke userlinewidth setlinewidth + Rounded { 1 setlinejoin 1 setlinecap } if } def +/LTw { PL [] 1 setgray } def +/LTb { BL [] 0 0 0 DL } def +/LTa { AL [1 udl mul 2 udl mul] 0 setdash 0 0 0 setrgbcolor } def +/LT0 { PL [] 1 0 0 DL } def +/LT1 { PL [4 dl 2 dl] 0 1 0 DL } def +/LT2 { PL [2 dl 3 dl] 0 0 1 DL } def +/LT3 { PL [1 dl 1.5 dl] 1 0 1 DL } def +/LT4 { PL [5 dl 2 dl 1 dl 2 dl] 0 1 1 DL } def +/LT5 { PL [4 dl 3 dl 1 dl 3 dl] 1 1 0 DL } def +/LT6 { PL [2 dl 2 dl 2 dl 4 dl] 0 0 0 DL } def +/LT7 { PL [2 dl 2 dl 2 dl 2 dl 2 dl 4 dl] 1 0.3 0 DL } def +/LT8 { PL [2 dl 2 dl 2 dl 2 dl 2 dl 2 dl 2 dl 4 dl] 0.5 0.5 0.5 DL } def +/Pnt { stroke [] 0 setdash + gsave 1 setlinecap M 0 0 V stroke grestore } def +/Dia { stroke [] 0 setdash 2 copy vpt add M + hpt neg vpt neg V hpt vpt neg V + hpt vpt V hpt neg vpt V closepath stroke + Pnt } def +/Pls { stroke [] 0 setdash vpt sub M 0 vpt2 V + currentpoint stroke M + hpt neg vpt neg R hpt2 0 V stroke + } def +/Box { stroke [] 0 setdash 2 copy exch hpt sub exch vpt add M + 0 vpt2 neg V hpt2 0 V 0 vpt2 V + hpt2 neg 0 V closepath stroke + Pnt } def +/Crs { stroke [] 0 setdash exch hpt sub exch vpt add M + hpt2 vpt2 neg V currentpoint stroke M + hpt2 neg 0 R hpt2 vpt2 V stroke } def +/TriU { stroke [] 0 setdash 2 copy vpt 1.12 mul add M + hpt neg vpt -1.62 mul V + hpt 2 mul 0 V + hpt neg vpt 1.62 mul V closepath stroke + Pnt } def +/Star { 2 copy Pls Crs } def +/BoxF { stroke [] 0 setdash exch hpt sub exch vpt add M + 0 vpt2 neg V hpt2 0 V 0 vpt2 V + hpt2 neg 0 V closepath fill } def +/TriUF { stroke [] 0 setdash vpt 1.12 mul add M + hpt neg vpt -1.62 mul V + hpt 2 mul 0 V + hpt neg vpt 1.62 mul V closepath fill } def +/TriD { stroke [] 0 setdash 2 copy vpt 1.12 mul sub M + hpt neg vpt 1.62 mul V + hpt 2 mul 0 V + hpt neg vpt -1.62 mul V closepath stroke + Pnt } def +/TriDF { stroke [] 0 setdash vpt 1.12 mul sub M + hpt neg vpt 1.62 mul V + hpt 2 mul 0 V + hpt neg vpt -1.62 mul V closepath fill} def +/DiaF { stroke [] 0 setdash vpt add M + hpt neg vpt neg V hpt vpt neg V + hpt vpt V hpt neg vpt V closepath fill } def +/Pent { stroke [] 0 setdash 2 copy gsave + translate 0 hpt M 4 {72 rotate 0 hpt L} repeat + closepath stroke grestore Pnt } def +/PentF { stroke [] 0 setdash gsave + translate 0 hpt M 4 {72 rotate 0 hpt L} repeat + closepath fill grestore } def +/Circle { stroke [] 0 setdash 2 copy + hpt 0 360 arc stroke Pnt } def +/CircleF { stroke [] 0 setdash hpt 0 360 arc fill } def +/C0 { BL [] 0 setdash 2 copy moveto vpt 90 450 arc } bind def +/C1 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 0 90 arc closepath fill + vpt 0 360 arc closepath } bind def +/C2 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 90 180 arc closepath fill + vpt 0 360 arc closepath } bind def +/C3 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 0 180 arc closepath fill + vpt 0 360 arc closepath } bind def +/C4 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 180 270 arc closepath fill + vpt 0 360 arc closepath } bind def +/C5 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 0 90 arc + 2 copy moveto + 2 copy vpt 180 270 arc closepath fill + vpt 0 360 arc } bind def +/C6 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 90 270 arc closepath fill + vpt 0 360 arc closepath } bind def +/C7 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 0 270 arc closepath fill + vpt 0 360 arc closepath } bind def +/C8 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 270 360 arc closepath fill + vpt 0 360 arc closepath } bind def +/C9 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 270 450 arc closepath fill + vpt 0 360 arc closepath } bind def +/C10 { BL [] 0 setdash 2 copy 2 copy moveto vpt 270 360 arc closepath fill + 2 copy moveto + 2 copy vpt 90 180 arc closepath fill + vpt 0 360 arc closepath } bind def +/C11 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 0 180 arc closepath fill + 2 copy moveto + 2 copy vpt 270 360 arc closepath fill + vpt 0 360 arc closepath } bind def +/C12 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 180 360 arc closepath fill + vpt 0 360 arc closepath } bind def +/C13 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 0 90 arc closepath fill + 2 copy moveto + 2 copy vpt 180 360 arc closepath fill + vpt 0 360 arc closepath } bind def +/C14 { BL [] 0 setdash 2 copy moveto + 2 copy vpt 90 360 arc closepath fill + vpt 0 360 arc } bind def +/C15 { BL [] 0 setdash 2 copy vpt 0 360 arc closepath fill + vpt 0 360 arc closepath } bind def +/Rec { newpath 4 2 roll moveto 1 index 0 rlineto 0 exch rlineto + neg 0 rlineto closepath } bind def +/Square { dup Rec } bind def +/Bsquare { vpt sub exch vpt sub exch vpt2 Square } bind def +/S0 { BL [] 0 setdash 2 copy moveto 0 vpt rlineto BL Bsquare } bind def +/S1 { BL [] 0 setdash 2 copy vpt Square fill Bsquare } bind def +/S2 { BL [] 0 setdash 2 copy exch vpt sub exch vpt Square fill Bsquare } bind def +/S3 { BL [] 0 setdash 2 copy exch vpt sub exch vpt2 vpt Rec fill Bsquare } bind def +/S4 { BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt Square fill Bsquare } bind def +/S5 { BL [] 0 setdash 2 copy 2 copy vpt Square fill + exch vpt sub exch vpt sub vpt Square fill Bsquare } bind def +/S6 { BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt vpt2 Rec fill Bsquare } bind def +/S7 { BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt vpt2 Rec fill + 2 copy vpt Square fill + Bsquare } bind def +/S8 { BL [] 0 setdash 2 copy vpt sub vpt Square fill Bsquare } bind def +/S9 { BL [] 0 setdash 2 copy vpt sub vpt vpt2 Rec fill Bsquare } bind def +/S10 { BL [] 0 setdash 2 copy vpt sub vpt Square fill 2 copy exch vpt sub exch vpt Square fill + Bsquare } bind def +/S11 { BL [] 0 setdash 2 copy vpt sub vpt Square fill 2 copy exch vpt sub exch vpt2 vpt Rec fill + Bsquare } bind def +/S12 { BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt2 vpt Rec fill Bsquare } bind def +/S13 { BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt2 vpt Rec fill + 2 copy vpt Square fill Bsquare } bind def +/S14 { BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt2 vpt Rec fill + 2 copy exch vpt sub exch vpt Square fill Bsquare } bind def +/S15 { BL [] 0 setdash 2 copy Bsquare fill Bsquare } bind def +/D0 { gsave translate 45 rotate 0 0 S0 stroke grestore } bind def +/D1 { gsave translate 45 rotate 0 0 S1 stroke grestore } bind def +/D2 { gsave translate 45 rotate 0 0 S2 stroke grestore } bind def +/D3 { gsave translate 45 rotate 0 0 S3 stroke grestore } bind def +/D4 { gsave translate 45 rotate 0 0 S4 stroke grestore } bind def +/D5 { gsave translate 45 rotate 0 0 S5 stroke grestore } bind def +/D6 { gsave translate 45 rotate 0 0 S6 stroke grestore } bind def +/D7 { gsave translate 45 rotate 0 0 S7 stroke grestore } bind def +/D8 { gsave translate 45 rotate 0 0 S8 stroke grestore } bind def +/D9 { gsave translate 45 rotate 0 0 S9 stroke grestore } bind def +/D10 { gsave translate 45 rotate 0 0 S10 stroke grestore } bind def +/D11 { gsave translate 45 rotate 0 0 S11 stroke grestore } bind def +/D12 { gsave translate 45 rotate 0 0 S12 stroke grestore } bind def +/D13 { gsave translate 45 rotate 0 0 S13 stroke grestore } bind def +/D14 { gsave translate 45 rotate 0 0 S14 stroke grestore } bind def +/D15 { gsave translate 45 rotate 0 0 S15 stroke grestore } bind def +/DiaE { stroke [] 0 setdash vpt add M + hpt neg vpt neg V hpt vpt neg V + hpt vpt V hpt neg vpt V closepath stroke } def +/BoxE { stroke [] 0 setdash exch hpt sub exch vpt add M + 0 vpt2 neg V hpt2 0 V 0 vpt2 V + hpt2 neg 0 V closepath stroke } def +/TriUE { stroke [] 0 setdash vpt 1.12 mul add M + hpt neg vpt -1.62 mul V + hpt 2 mul 0 V + hpt neg vpt 1.62 mul V closepath stroke } def +/TriDE { stroke [] 0 setdash vpt 1.12 mul sub M + hpt neg vpt 1.62 mul V + hpt 2 mul 0 V + hpt neg vpt -1.62 mul V closepath stroke } def +/PentE { stroke [] 0 setdash gsave + translate 0 hpt M 4 {72 rotate 0 hpt L} repeat + closepath stroke grestore } def +/CircE { stroke [] 0 setdash + hpt 0 360 arc stroke } def +/Opaque { gsave closepath 1 setgray fill grestore 0 setgray closepath } def +/DiaW { stroke [] 0 setdash vpt add M + hpt neg vpt neg V hpt vpt neg V + hpt vpt V hpt neg vpt V Opaque stroke } def +/BoxW { stroke [] 0 setdash exch hpt sub exch vpt add M + 0 vpt2 neg V hpt2 0 V 0 vpt2 V + hpt2 neg 0 V Opaque stroke } def +/TriUW { stroke [] 0 setdash vpt 1.12 mul add M + hpt neg vpt -1.62 mul V + hpt 2 mul 0 V + hpt neg vpt 1.62 mul V Opaque stroke } def +/TriDW { stroke [] 0 setdash vpt 1.12 mul sub M + hpt neg vpt 1.62 mul V + hpt 2 mul 0 V + hpt neg vpt -1.62 mul V Opaque stroke } def +/PentW { stroke [] 0 setdash gsave + translate 0 hpt M 4 {72 rotate 0 hpt L} repeat + Opaque stroke grestore } def +/CircW { stroke [] 0 setdash + hpt 0 360 arc Opaque stroke } def +/BoxFill { gsave Rec 1 setgray fill grestore } def +/BoxColFill { + gsave Rec + /Fillden exch def + currentrgbcolor + /ColB exch def /ColG exch def /ColR exch def + /ColR ColR Fillden mul Fillden sub 1 add def + /ColG ColG Fillden mul Fillden sub 1 add def + /ColB ColB Fillden mul Fillden sub 1 add def + ColR ColG ColB setrgbcolor + fill grestore } def +% +% PostScript Level 1 Pattern Fill routine +% Usage: x y w h s a XX PatternFill +% x,y = lower left corner of box to be filled +% w,h = width and height of box +% a = angle in degrees between lines and x-axis +% XX = 0/1 for no/yes cross-hatch +% +/PatternFill { gsave /PFa [ 9 2 roll ] def + PFa 0 get PFa 2 get 2 div add PFa 1 get PFa 3 get 2 div add translate + PFa 2 get -2 div PFa 3 get -2 div PFa 2 get PFa 3 get Rec + gsave 1 setgray fill grestore clip + currentlinewidth 0.5 mul setlinewidth + /PFs PFa 2 get dup mul PFa 3 get dup mul add sqrt def + 0 0 M PFa 5 get rotate PFs -2 div dup translate + 0 1 PFs PFa 4 get div 1 add floor cvi + { PFa 4 get mul 0 M 0 PFs V } for + 0 PFa 6 get ne { + 0 1 PFs PFa 4 get div 1 add floor cvi + { PFa 4 get mul 0 2 1 roll M PFs 0 V } for + } if + stroke grestore } def +% +/Symbol-Oblique /Symbol findfont [1 0 .167 1 0 0] makefont +dup length dict begin {1 index /FID eq {pop pop} {def} ifelse} forall +currentdict end definefont pop +end +%%EndProlog +gnudict begin +gsave +0 0 translate +0.100 0.100 scale +0 setgray +newpath +0.500 UL +LTb +481 331 M +-31 0 V +0.500 UL +LTb +481 580 M +-31 0 V +0.500 UL +LTb +481 830 M +-31 0 V +0.500 UL +LTb +481 1079 M +-31 0 V +0.500 UL +LTb +481 1328 M +-31 0 V +0.500 UL +LTb +481 1577 M +-31 0 V +0.500 UL +LTb +481 1827 M +-31 0 V +0.500 UL +LTb +481 2076 M +-31 0 V +0.500 UL +LTb +481 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +751 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +1021 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +1291 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +1561 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +1831 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +2100 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +2370 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +2640 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +2910 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +3180 331 M +0 -63 V +135 63 R +0 -31 V +0.500 UL +LTb +3450 331 M +0 -63 V +0.500 UL +LTb +481 331 M +2969 0 V +0 1745 V +-2969 0 V +481 331 L +LTb +LTb +LTb +1.000 UP +1.000 UL +LT0 +LTb +LT0 +3087 1963 M +263 0 V +481 1567 M +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +9 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +9 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +0 -206 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +9 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +9 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +0 -813 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +9 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +9 0 V +10 0 V +10 0 V +10 0 V +0 -206 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +9 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +stroke +1464 342 M +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +10 0 V +9 0 V +10 0 V +0.500 UL +LTb +481 331 M +2969 0 V +0 1745 V +-2969 0 V +481 331 L +1.000 UP +stroke +grestore +end +showpage +}}% +\put(3037,1963){\rjust{$n1=5, n2=20, t=3$}}% +\put(1965,2226){\cjust{Hypergeometric Distribution}}% +\put(1965,50){\cjust{$k$}}% +\put(100,1203){% +\special{ps: gsave currentpoint currentpoint translate +270 rotate neg exch neg exch translate}% +\cstack{$p(k)$}% +\special{ps: currentpoint grestore moveto}% +}% +\put(3315,200){\cjust{ 10}}% +\put(3045,200){\cjust{ 9}}% +\put(2775,200){\cjust{ 8}}% +\put(2505,200){\cjust{ 7}}% +\put(2235,200){\cjust{ 6}}% +\put(1966,200){\cjust{ 5}}% +\put(1696,200){\cjust{ 4}}% +\put(1426,200){\cjust{ 3}}% +\put(1156,200){\cjust{ 2}}% +\put(886,200){\cjust{ 1}}% +\put(616,200){\cjust{ 0}}% +\put(400,2076){\rjust{ 0.7}}% +\put(400,1827){\rjust{ 0.6}}% +\put(400,1577){\rjust{ 0.5}}% +\put(400,1328){\rjust{ 0.4}}% +\put(400,1079){\rjust{ 0.3}}% +\put(400,830){\rjust{ 0.2}}% +\put(400,580){\rjust{ 0.1}}% +\put(400,331){\rjust{ 0}}% +\endGNUPLOTpicture +\endgroup +\endinput |