From 4baf655d1985caffe2d9b3c83fb8d921b858ad92 Mon Sep 17 00:00:00 2001 From: "Paul A. Bristow" Date: Mon, 23 Oct 2006 11:58:13 +0000 Subject: [PATCH] Worked example of negative binomial from wkipedia. Need to remove the construtor examples elsewhere. [SVN r3298] --- example/negative_binomial_example1.cpp | Bin 26346 -> 14422 bytes 1 file changed, 0 insertions(+), 0 deletions(-) diff --git a/example/negative_binomial_example1.cpp b/example/negative_binomial_example1.cpp index e85ec7cf7d8a4e8bb227d3f54ceeae0d4185edec..1af6f623cf38752a0be9d0c527899ad9cf8d6ed3 100644 GIT binary patch literal 14422 zcmdPbSIA3EPb|qSON~#;%*)TsOw5T-tw_u*$VoNSOD-tj<>KYi*H>`PFQ_caOwTA$ z2uLi=QE=2#a4O0yF3B%fFfuSO(}SuCEl$-@$jwj5Ov_A8EXmBzQ%KB9QAo)wE-A`P zDuoCXr79GcCS|22mnf9vE0koUg3Wiz&o3@f2+mI{DNig)Rq)A7PR#=u7M5C63^K=1 z&p;2XP$M`sRUt7sIX|}`F|RT+FI^!mGbdHS$J5!>FW5ESFy26~q@o0@G`~n8IlrJ% zA+bauqokz3N?*Ucyj(8{WRqTgQMx{w9!-!Zlv7gEGV@Xuoc#TRL*jiMLp4m zRdPmRQG7{JVrEIP4Tx=LWd#aEb%pZ8Vuh5{Uw)DF(&XgSVrVR9YZoavr55Gom*(VTY7}UK(nexVu|j!fNd`=%LOvul zfW1*tl$n?ViGtwNoE%W7qDOOXYGPioLV9XR30xL#r;b8#zCw|Lt%51UjF5~}g_8V| z#2kgZ(%hs}a25euQLLZ=PK2P6DiKsPLsF)uLP$ zZiaYH8}4_7{33;H1#PgkAlg*HRv`~zeNkdwN`9_FSz=KpsPI%Mhh&J%ypq(S)Z&uV z6i{ve*_n}w4Y$w$TcAbW~SlVDjs8{{Yj zQ-#dDl6-|k1;5mEr_4MJQyoxp)>J@AUtlXi2{%8fBoQ1)sS0WNIXU^|pzuaf3QGK- zw1!-KfyAJ$*8r6ec?$LlrkYmJM2I7SgMA3f_-UDWnZ+5Y#R~p@;6z%Iijj^L6co}l z3=K3DY!wXj3=Is7jVuk!j7)Su@sOC5Us|GI2ntd|12U}i4^nV)b@LB$RVV^we~^bk z{sWa$=-DYGUjgD+Q2Na;Qb+=)6R@L^l|$kKvLbX7%U|MEcNrsL>ab^XWN-YEV z7VHsZBOqxhxHMOxBqP5#6{%#%Of3cntb&39s5Va1FolGQfuVts2`?91*bFLcY+!DL zBy0{9HZ?V}G(!@%fQp-&n;4oP%qcF-RjAIgH3gN%7PSg#8d(r^hUUg*=0pZ|YDGq3 zX>m!h0;ni5Hh`3`1S*7-{M6z+^%8Jd4Gv#;9c79r_KIP}oS}lQLUCy>%%R2xaF>E) zGV?%ft(?>nP)$*isGv~*PDUo0puAvgplhmasHtFErvOrGpl4}mVPXkZU|?WqY6$gX zF{sU!Q=E_74g=M@dZmdOdZ{U;`o$%QCHhIQVo%>QucRnHr4(Fv>s4fwnA6cq^IWT6=W3HgIXr(`9+nsAajfLL75FqCKsia zq=MYU%cY!|mz-0YlB!?>ZV>8&oC8(}YpE9NW3*fJG71Xpz{w`R2urgWWDQI=C~ZJm zKVajntU%^lSz#C%kF3d>my44aP1YbclvEa^f|{QNMfqi!DWGaPH7&6;r$hlH0jhXY z@=KF)QuPonQLwT?aZGYbnl*0Of|N9{Jpo1eNk}y}h7a&qP*|D>YIdYrgMu6p;F1~qhdBBM#K&ubf)!z_f`XEQjg10KABe54pbnzqm@v`>O3Jo@ zBt|=h+)7Y_H_))q168C(rkdc;)z?>WDg`&DL8VPzS!!NpYFnGV!k zg~X!tQcyG(E9lxOfTc*c%2>k!7Lh1U2OFmYYCNT;rxq!wQPWNn4GTRth^=m#;4%sx zVo+S$^uZPO3edjDy#!CpgaSsS!^QnON&5y;L&Y{! ziJ3W|hC4W%3Ht|TnFUoW3(f@RYj`(0FCR2o1nKR=`h&&b1d#%*FHziH1a2&XGB~Jz z4bJ#UsmY0@#i)!u;>8!7~wVr%z6YGr-lX^rr^rX1X6xD<(Fh2 ziY8y%)2De!AV0!m4-zd9Z$L;; z<2NxUCmuSaV5?wk0Ja}AvV$1YfyzQhl2Sn(B~T5QD`NQt6(m)u~C4w%t79RhNprOXjCI3u~;DylGYRoQi~uR zdeAT#Xb@1L2vn`+r$IvtEj1yTuA~FDPYKkiPE{z+FU?8O0gbC9mZcUYrh^KJ)SMiM zDS1hH=xI+wQ$b6?(7*uPw}1>)CxQphONzjADj+FH3ef|1U7&t}*bnzjIA}~V5xdi| zTMD*MM{ur1$0_wUJAGx08PZe#tvX6mV??JPy;^YK(zXF3e-d;}5D; zBS=ctQ83d{FxOE~Q?P*MLIqIi2n%8)_n-&1zP^G1%q7|iFbx=KPhVfb5K|dOa?#gU zfDXMYC?HJ3h+%zw1!I_Lh*}pSqOY&uUj!XF0>w3~HHB!RXlW(GV^&KGWjqWqeW;O~ zlBSTES6q^sm;xFphXrjxN?I{!o(3h`f|@bNB}jf6co-fuF#>8SL)wt=3LcRsAua|7 zwGvWA1gYio^FZ|l(u4^()mwn#MG2+QK{6#7THIiS7;-2<)RR{985*Ei33dc*ehKU@ zSj-z5pr;Uo)dLk~hLAQ7iVq-x01kRspy6{mL^+9JW{6@VEX+VtCy?d{Jj_7zC`fq> zXHiYZbY^G>b}xz#Ac24yW_X+qQBGo*8KKw+b_4cwW;6)XnGx8%C_aD$0&1AyaXLh~ zzP^H6W*&SfJ`>!S%}7-!$}G+X6-1!M33%lPbb249kTHd{?LpI|3XldqxJeBvj1s{s z8({Suw4{ee5SG*h>ZO7-!luztECT0yq+|+I>A@$L zGz`rl6Bh9PK4>x&<_rz=l2+3iJX)auYDJfTlLK1CkeiwcUXlS0IOy;KN>Pv6BCxSh zC;%CQ)LH~BLqcjN=BFu;W~PB2crMz&!~g~?At41y2}m9{2KgHz0~v8ps8X<1fKBj$ zo3#ZXC9p69Ia3Km8XUP`=PQ9G!NJ@r1#RT`0%=0>8^{SDAtlc=aBm_xKQApa1w3zq z!=IVO(83hrQjlXnX$ZU;39@7c(u@ZsV{pRKZ_|A}V45+oqNOTVDq+tgxBC1?UtP*8$;0+$ES zjDtHD;$YC25O|zhp`f@pvno|V!B)Z05IjSMNXo_05Xo2tTZL)^@R+56fgxz31xkV! zzkmh6EK87-C4>oKTUzQU80ytR%>}Jx(E!<;2^s~nR>)Mafm&~^kg2T=9sGd~!69W5 z&ot1;Czhy&2P!zq3W}pMVojeTF~q@h=CmI<)D%N zTu{N0h{Lhq2!ZA4G=p@Q*V>Pm%~ z1zJgJ6_cj`ofS{jE6+$QfsDX_4MlMjFBfMKWErD@H7{2!xQ7EuQn1;5UM_ttQ2h9p zmK14zz{bkYM^JL!^?$##M8t8(&T}(b})xCdAV?mT7nD*jk%FJ zFv-hhXasMgfVyem1{!oJFsPA*HV%i}1i(40gEBk^9YZqEGX%#Nd^HYE-6(@X-~j_$ z1p_?;V*_&{4L}*;Nz(w2?HK48n3@_BX#h&Q1v*e;pl4uiZbF0scm_q%G>}S1P_dn+ zVaCe^VIU8PfSNTX;KYU6I06lff-C>bVnor596`KXDD5v$F^b|BsKG=>ax)AmH^LOR5#~gNgdQG8K#~HXu++oj216s_ z9ASyu8-_%>0@SA{$-o||MutQ>1CKk5h)Y>|mZ1I&E{7Ns6&`q^#8A&7RomDA5+>yJ zC$RS-OnJE=c})`<6_j)oKs8lrF=%Z`r9yUUC1`ptIX|x?Gp{sNK@S8$B?2#(mOg}r FkO0{v`~m;~ literal 26346 zcmezWPoF`bL4hHUA(bJWA(5ekA(NquA(bJXA&DWAA&()SA(tVOA(0`6A)XXX;%oy~*=77wDm=(%U%#g~U!=S*B%aG5I z!jQ?3#*oR740UHdLmqSLkfceSQca=$lfG|Qm{{8DvB6V859_b8A=(F7_t~r z8Ir-S0@<#>P{NSGkP5aJVy6>BK0`hO$Rq`ZV1|5#G=>s}a)v|(h#5X$`%@Y6;4TYe zNM$HuC}zlHfY=5K7XzqIASP-s1T&<9U69C-%#aKY(*m%&E5Tu$&Y%GH7bsK}7T-6fq<+q%-6)Br+&KV7Ph>~}r%5XY1qKraLk1%Ta|TTY1#lQZ z!U&W`GT~_gl%5s9=^12tDnl_+{ADr}L&Fsm$0gu+DuKqQG6Q)oG6lN{;i5#Sjp+<| z47m)T)C7t!HU6(A(|8SOSG2D0Y(>a=^MlZUp7h zRB()f@*v2cAW=xJR|fkClE*=@55k}{tia%kQtl`)7&0h;^Q8hqDLCHp7(h7)lsfU3 zU?3Ag7-A}FP65S%9z!`pCPOwuCPM)O$X%dv50PJBa{3H@M3j{ve}Kvm^wJ1qKL|tI zpuyk>E?+?L2+F~b)SeGb&AAK;3`q=?3gM11Kl`?SJEN0LF=P8JZ z0Srapuz{p$NGbxAVW1Ke6yBh+4wREX<$N+YrGrEj7=plMUMhnwg9o^z2B`s+uAbnM z4y3vST&9A`QHXgV;BqtrTu0pl+z5kWOJsI-9C0tyvG=z;PsL>^RffYLdrCd>zi267mH z>N=3UpcDc!D}x~utOgX4`3w+$r-17bP`v|*6Br*! zIx&Mm0UTOF-p5$d#ZH3FK=?%0zbws9pw{ zgXtnfPK1OUDE1Y=wXGS+wm`~fP^f{*BZyBC=7)pJ&=Lkvxrzv7Q0;@wAE4X^s*^w| zx0E3d++KmTFJS2%-ItIMQvjE?pppj^hY(+ZLI#o^K>h=zKA2iiDnbo=dvIBTaCZ;t(1lxqm(W>EeI`3U3&P#d5GTn>Oz94M_o+V1FX0{Iq_Lm_2~0)s7s0)r{E z#Q<>!qyz+|Oi+mg@+GKrDrLxJ0L29;$3wyz;R}!pG>}R{NG=8CF;K{Y>;siokQ`kM zj(bp;KvaQRRoT!o1ttQDX;8@vN#DpVa!{KK<|mL}K<0yN*Txd>pzsH|7L+DH@*pNJoj zsD=Q!5aeS}D#&BN3`ykB0i{1go&)KE!0tzcgdPVIILQ*nn_-inLYy+hhkbhIb{?%l#0+%BQ_mWnMgZu%B zM_8>7%H5#8OEI{;0ZJjDz7oRCpfm&uVfBtN7vXfPNu7=UvYD4swe58@jz7&90# zSc3c0Mhqt4Sb?+yLFpLOiUFl3P#YQ)rl8ie0iAs5&kzLe`@1r@F@V^v&=wA)1psml zD273y28#Vu`1k?-&PoVZ2oEs0t)*L1iPvZMgi1T0?-!4oDh-v=0%z1W=5^+CQ1#@)VI` zA*lq`2L`1UQ2D)cn=+V!Q=u6S z^%iJuF=sFb_uNewOt9zxl~ADGP&GpqgDnH742QHoEf{LSb$|v#7K(X>4CV~R3}y`G zV6#B}gVb`A=3meV7^poBs?|!My(dr!rNCg!V1Uww1?6o}iiX4+DCLpTO8~X2L3K(V zgF3jCj40t@sSQ+9qV}agp@OZ{M{m)Aa=tEfG%S|^Jw!qNzzkEE9*~b<<5!>>5ma7* z`lzW4pwe3b+*X3rub|S%gh7)5Rxg0e)nzbc&}J}%##9{xsO(W-0J#OE8Z-i7!C=B* z39X?)VxUn$Lk7_3i2_qA>O$ZbA-22j5jRCj>-aiBIMs0R${N9ZwBfX6g*8FIibf}|_#c7s9+ z)c*w0=?ul-@lsIBLZ1ON`Uh&g6*K5VM>9b@P@ANHA%mfS!5%6K8j}T;6qO9NaQA}r zz*^A=HmKbUiUml!36$bNSQ%V5gGOLV!J~Kz3^qt(f%@>!0fj~ZxTOyo^8k(YrZJ%Q zJ3uypN>Wff>w(=^z+eXs0Zwom1(Y&Cr8lSt3@W8cz+*z7+8Px4pi!hua5#hXTZ2c@ zAR!0R2MQn9s4{wrLU#wGWTdXYKsgit$PsxyCTuQpNI*tzK>ak($UCU#0U3FKv{ne4 z1qm5qV}r1H@!+&m#(?ZbP;7z55A8C4jLB+m3W|B0!q0cj4hTy zycAx<{A>Dw#kd z@E{i^Gl1HlAUEehO~>UgM7|+4SEhkSP(bw|q_2_#E@?oe2*RbHyauYXK=Fq^mx9K6 zL1VL^-dPGmJOifb$mxOlz5(UKTyVLBp67`7Lk@T*3t|egYayeQpz$nF$^peE$o(J; zGFyQG)CUH|7pUh8ny*O#*YKc_h17AN(GyU8o(i1<1Jxd&T!3Cifz*NeULdugzEV24 zg$fFLh*{{lMi*nQ4d!=*+aNs{(C7|m#0-=NQAYtmsZAFpwm`0cv`x_62g+lh7F-B} zKX{e~WD5v`S{)MYzV$Ant~gn4pk=#J?kWYzS1} zg6dbumH)#IQs1JI}psOAEdi=c1^#Rjam464IHYCz*> zAaPKOC5NGs0n#obw!F?EDNTd?1e#p~wa7sIcpC=Ls3v4|9wb){E)PL05C*vlG0JQJ zF7Y8D0va^~wJJcPYM>q!DE>hC1{5ct`QRe(Y(o))4FhPL5ahEEhDz}4i5-ImgA)T{ zrqG!o6g&e6n%4x)9J(=tGWan#GlVdBg69iCp{c|Gaw}+bB^^9o0xFk5eN{-FRAn$^ zPz9$fSYAN%%Rns?1qM6txE81#uE?MSR+-J9iB#@_{8|h5IVgNIpeb z!vG4k0tQf92@-0^;RfqZfpTI#Lppdim=+;{S|@@=c0g$eG;a;5O+cv&)W;wtRA8em zHsEjqwdrBuglbznc!mx%CWG9+1kLV1YDiExf-oqJpr##AEeI+VL38x+;5IBs1bgZL zweLZ(0}D~mx&cuB1+}_CW4WO82FZO@;4wB(NeYTH(8vy`Jb1fP*`A^OY8gs3L|Rf zmppiW0r>@li3ulEHK0Cn0fPnua)||+15jW9jmLs=B&1Dl3mv0W=!}sw+XR0;LK>J&V6)1lbRY2jtcpC{ID!w~%pV&^#F= z$ANkcp!GVSu?dL3L3%;ChLVyF`dG^9lLWdOBNLGwAFQV}#$m^FX7hpq>+`EC=0KzbvfG7WV+4brj(jk$r^OQ6|2P@e#_z73=UG~)rX9Wts1S}g|Rf!qS> zTfxEs;#!copgswxe*tL$LvkvlcLP%k5d+n{pfP&)^AA#yOP^duaG*E1S zL=Y(h)S5s}44qj%oW<;luAr34(T6)X1780HKc|vz-SwR#w|g!rJ$Yy zs8q}Z_ZdJe&>A=pwqXGAP+b8L1NChXV@{y(17T224Qg?s>OhWFM5zl>kLp{H2qax0 zdUKgbF$9uFu6ILG#KI;;u+i+JQ;kz>wM$Exk`-zRN8<_56E}}sAPbs1of1C8C=0DZygzY83Mri z5$OS&-#~G!1W%Rd_JQIQls-Wz6@(!v6Ql~eU8w3|s(l$C>vlmsdLITK_zGT_Y9)pk zhCHx9a3seJu=4_I|Gor-| zpz$xzoJKKt9Xq6d2r7|Gkw!WobG?w&S;*=@b8MiVWFmCE2*@rF#%CXB)D*q94zdqa z0-7M%30ZLm5(TX`1C6wT=5jH0LrQXxtso3a)u0p(8f^jj3RLfb(ksGW#tfkTEUaG* z8mofzgF*EbNEK)f1~giQYA$MNrUYKIj$8|Z%3;u`CTOe;G)n;)>jL%IK;sIK)zqMI z)dKKJY|tD$D9wXh268c|?t;~s=s618C?BNO2E{mN-UyUqA>$sP-2;dejccr3gTWZ7 zH3AAX5Qd~!Sb9`qa0IWa1oc;u-A&wzTP1ip1epxN2y-E`9cj?i2O3X=g@!M9=K^Sb z3aESn)!NiwgR8@U={9tqgTf7z8c^pgLAg$k4r`#57+_%qnbie_9t=ZV3UUc%?TDH} z6&RGj`$|B00W>EM8Vv)jN$UO28n}W2bA+bK7^H`sJ$Lc zwh5hx#n;u|zZ3JOJBp$q9bfyy9I-3lrhK_iQ0(3v_= zY66XVf<|sYY+QMXxcIx3b32QdTYJ5Xu`^*&1&ApJf_Y6a;AnGUL*LH#38 zI3Pj|;veK#!OVY8{yf6o~QAbLs!b%oI-ourW5$hhw3srLl(3lK*s{}KT4TrRfSwiCqRmAF0 z@

Okc29&%W6o?2b%rHT;WW7XcH;}LFF50?hdrl15%2>c#zZ&;~~cyvd=+fAf$X8 z+GRXy3j(wb2eeuWRBwWMx}drbRCj}VcA#}9`ruX^@)$6_b_OK=kjrsUy-6r$K&65i zc%_3mm;{X-S)h$nfI=S>L!^ZLK$P|9DTY)x)4wF8)W!5KrO;gr$(5+B7GyP$6z>n- z83$^mgL){Wj^t=DXfZ&>vq3xRKy6USE;W!iXciOHA_nzGQO9{O$5bKX;-EQnP^|&V zSD;pMB6v?Pq~{LHfsoOA*zO%r`UhdmRv2Vl5;TecnhU~gGeb;;^}b+!2aSt^@+M+r z5LN;p>MBC{7CDSTZiB=FNI$kd8uDlYq@RGV+y|KgF%Oi!AS@+lPYGLl2D@7bmlhff zAoB-9ixAldn6XT~9ua7q1eC^*OKDJA1f>QvU?G!1v$Bd0)6NI`NP;n*Hbv5f2o%$TNTE;7VZ8X-a( z)Y>$J?-oKH^CBFs$hio#&T%vsfm)=Py-MUbN2FU&c}2~72o#Hmc%@A)8Z5Dl9HO+% zMMfm#BG8;YWSs>lZiy|OkaLmIAn8$qQYi>yhVAgLi$HMzi96b~=L{J@HVlTc5`Qit zE~a7g>9BS?`drGuw&P*@!9lx4K)c34Yj}~*cYwJXbH)cE5|4CV4ygSJOBbNLfoSD} zWI+8ZQ0<8vrXW=i9k6nfaGk0FUOj=i;$SeO7m$BI7}8(G*4qT_2mtNGLG(W{*L{Ol z4ZzympxxA<5eP%@xC;8&7NAx=F(GEe02!S@)enjZ5C*vzgdwg*>^_6U7^t2EjVC!X zfL7mu=43#z30i9bnuh}ImH@310+oZHy~Ut@NFH=18PsEi%oTx52VsyZ&>9Lo@Xij< z{yvZ$kQEi6HYjKu53!~Tqyu$*3uK)qNSqj7TQGojdV|KMQ2mW+1I$f`mI1CdCafP0 zO8JnPD%8F=Xx0i_j~L$wC?xfR`~_j5j)8!D3c`?>p`W`zYk?4F7Z@;@fX~GQ?Se;O zOYq7Q`UX?L`#spB~9<*u_7Q@sDW9+U4g&elfLWG+E z^y~`Mkb}gq6ZmX9(3lg*AE32IsH=R7!8=kx^SGe&2b!yf>{J7V6J%5uw0;1TA3=E& zvVsV<*2kH_k->!l6spMi6SUG7H1`i$3j$jI1j^~45jM~YLC`oEYW{_-~V)8y{eKM%5 z1(^kjd&ufl$SJX)lnTL+a0i7Vab+oNH@XHx6}Uvs1Ct;dK=BE}5OX0UYUxG1`(d^~ z_V0kw6ye+m@+rP@4&)-t+=<9tAlE_4AkZ325QgwT;-DG`R1-l&u;m}bid|5Ttpt1~ zrv`YHD`bQeG_zR309qGs1wQW-v?j6ud}bJEBoQ=UkczTW4s}%}$nBuD*AV^azCaIk zkZKTyt?p7{0Ikdi^*j?9Kx>;o`3p4C3OdOJloCPga`+lNRF{GB2WZ{96?pY1$W%}p z22qlL)~SJ3eU(60qeDUn;Z{UgA+Irmgciu%oZxff5bLBtD<(nWpf$*_+y*KOK)D7q zqXS~Y))Ir%=`(1-%VB?T=}`bCLHWEG>D(x6XP1KVImkTFNIKy>1qwCL8h_BbCP0PPh^0{fwuAqHH&f#L+Tx&hTTkSt`i z3hayyQ2U!uTMD!<6Z>h=3Jl@kGguTDyuc@of>xD-`W=Q0CJa^#CJd$wRt$y=pcyFG zsnDSC2C0IS@1_ipbBGXU`=Fnp2g(T`pMuuofXcXmTB!Avc3?}CIqeh1Fe}u^nO5PAO7`+pb{Q*LK?_?O4ezD zQYNSt2kpg$xDC;#1I=v_T5AcipR|>eFqeboB0zCN%*s-bEufqX3Mo)&0$be%DuZyX zg@lX=Ai@;nJ5bpLn)4#OP7zdhVatt>)(s?WgK{XPYt>9~j)j3nkrAuSK%s_u?iuym zfO{nt$PJKn6QH&Z#0{V|`moc~sOJXU>y|)n0QK@9qks@Mpq|l2Jy+oFcY$1iSS12+ z1>)p4Q2M0Y71(-$pqdSoOYpl4l1@NvE|5DRF$Uv7!Vbnm^#h`f2=W04m}@0P`IPI8JBxOW`RabAU8OG+Cqd@je=&(K)OKX5~zOz zsyiTUB2YU9G}eF^i-x!Z)I&37Fb20o220rC^99J&ptA+d7$7}yYK9%|nK4j`1kIzs z=9EFM0J#!$F5_SeJKVkix!MGLE~61N#;F;4xMxHlp@*9C3>YlItxZb?$QhM`C+*?( z2PphZ8O#_A87z=SGjN3=q_iP_92|G)L+a=?sJ4TZ0w6zt^1LDVTt`rC3<`M=2KfUt yz5;4vfW|pN?RU^QWFQ(cdJpP>g4V@@S|Fw1vzS4BAqWPUpv9mMFGoOpWDEeW>0?L$