MVR4
I%stat=6"%&falseGE\[lfs%3PlotRunningAverageG:6#'%"LG%%listG6&%"NG%$SUMG%"AG%"iG
6#%CAugust~23,~1993~--~Zaven~A.~KarianGF$C)>8$-%%nopsG6#9$>8%&F:6#""">8&-%&arra
yG6#;F?,$F6""#>&FAF>F?>&FA6#FGF=?(8'FGF?F6%%trueGC%>F<,&F<F?&F:6#FNF?>&FA6#,&FN
FG!""F?FN>&FA6#,$FNFG*&F<F?FNFY-%%plotG6$7#-%$seqG6$7$FVFen/FN;F?F6/%&colorG%$r
edG6#%GPlotting~the~running~average~of~a~listGF$%*LogisticSG:6#'%"nG%'posintG6&
%"aG%"rGF1%"XG6#%@July~6,~1993~--~Zaven~A.~KarianGF$C%>FN-FC6#;F?F:?(FAF?F?F:FO
C%>F<-%$rngGF$>F6-%&evalfG6#-%$logG6#*&F<F?,&F?F?F<FYFY>&FN6#FAF67#-F^o6$Fhq/FA
Fhp6#%?Generates~sample~from~logisticGF$%,ContinuousSG:6%'%%exprG%*algebraicG'%
"RG%&rangeGF[p62F1%$varG%"xG%"FG%$CDFG%"tG%#llG%#ulG%$ptsG%"YG%"jG%%RandGF_p%"b
G%"cG%"dG6#%DJanuary~24,~1994~--~Zaven~A.~KarianGF$C2>F<-%#opG6#-%'selectG6%%%t
ypeG-%'indetsGF9%%nameG>8*-%$lhsG6#&9"FL>8+-%$rhsGFjt>FN-%$intG6$F:/F<;Fgt8)>8(
-&%(studentG6#%)makeprocG6$FNFgu>8,-FC6#;F?"#s>8--FC6#;F?9&>8.""$?(F6FGF?"#NFOC
&>FA,&FgtF?*&,&F6F?FYF?F?,&F^uF?FgtFYF?#F?F`w>&Fav6#F]w-FiuFiq>&Fav6#,&F]wF?F?F
?FA>F]w,&F]wF?FGF?>&FavF>""!>&FavFLFgt>&Fav6#"#rF?>&Fav6#FevF^u>8/-%$RNGG6#F[w?
(F6F?F?F[wFOC)>F]wF??(F$F?F?F$2&Fav6#,&F]wFGFYF?&F_y6#F6>F]wF_x>80&Fav6#,&F]wFG
!"$F?>81&Fav6#,&F]wFG!"#F?>82Fhy>83&Fav6#,$F]wFG>&FgvF\z,&FezF?*(,&F[zF?F_zFYF?
,&F[[lF?F_zFYFY,&F][lF?FezFYF?F?7#-F^o6$Fb[l/F6Fjv6#%gnGen~sample~(size~n)~with
~pdf~given~by~expr~on~the~interval~RGF$%/ExponentialCDFG:6$'F^sFer'%"yGFer6#F[s
6#%BAugust~8,~1993~--~Zaven~A.~KarianGF$@%3-Fbt6$9%%(numericG2F[]lFdxFdx-F`q6#-
Fcu6$*&F:FY-%$expG6#,$*&F6F?F:FYFYF?/F6;FdxF[]l6#%0Exponential~CDFGF$%*Histogra
mG:F$64%$YYYG%#YYGFbsF\p%"lG%"uG%"vGF1Fcs%"kG%"pGF^s%"UG%"VG%&countG%(trueminG%
(truemaxG%%nintG6#%@July~7,~1993~--~Zaven~A.~KarianGF$C<>F<-%%sortG6#-F`q6#&F\u
F>>FN-F86#F<@%/9#F?C%>F][l&F<F>>84&F<FT>85"")C%>F][lFht>F``lF_u>Fc`l&F\u6#F^w>F
[[lFdx?(F^uF?F?FNFO@$52&F<6#F^uF][l2F``lF`al>F[[l,&F[[lF?F?F?@$2FdxF[[l-%&print
G6%%3WARNING:~There~areGF[[l%@~data~points~out~of~plot~range.G>FavF?>F6-FC6#;F?
FN>Fgu-FC6#;F?,&Fc`lF?F?F?>FgtFbbl?(F^uF?F?FNFO@$31F][lF`al1F`alF``lC$>&F66#Fav
F`al>Fav,&FavF?F?F?>FN,&FavF?FYF?>FA7#-F^o6$&F66#Fgv/FgvF`bl>F]w-FC6#;F?,$Fc`lF
d`l>Fiu*&,&F``lF?F][lFYF?Fc`lFY>&FguF>F][l>&FgtF>Fdx?(F^uFGF?FeblFOC$>&FguFaal,
&&Fgu6#,&F^uF?FYF?F?FiuF?>&FgtFaalFdx@$2&Fgu6#Febl&FAFT>FcelFeel>F^uFG?(FavF?F?
FNFO@%1&FAF_clFjdl>&FgtF]el,&F]flF?F?F?C$>F^u,&F^uF?F?F?>FavFccl>F_yF??(F^uF?F?
Fc`lFOC.>&F_z6#F_yFjdl>&FezFhflFdx>F_y,&F_yF?F?F?>Fgfl&F_z6#,&F_yF?FYF?>FjflF`e
l>F_yF\gl>Fgfl,&F^glF?FiuF?>FjflF`el>F_yF\gl>FgflF^gl>FjflFdx>F_yF\gl?(F^uF?F?F
`glFOC$>&F]w6#,&F^uFGFYF?&F_zFaal>&F]w6#,$F^uFG*(&FezFaalF?FiuFYFNFY7#-F^o6$7$F
]hlFbhl/F^u;F?F`gl-Fjn6%%""GFco/%*linestyleGF^w6#%=Graphic~display~of~histogram
GF$%5DoubleExponentialPDFG:6%Fa\l'%$sigGFer'F[sFer6#F06#%CAugust~11,~1993~--~Za
ven~A.~KarianGF$C%@$3Fi\l1F[]lFdx-%&ERRORG6#%OSecond~argument~must~be~a~variabl
e~or~positiveG>F6,$*&-%$absG6#,&F[wF?F:FYF?F[]lFYFY,$*&F[]lFY-Fd]lF\zF?#F?FG6#%
;Double~exponential~densityGF$%)VarianceG:F)6'%$ssqG%"sGF.F1Fap6#%@July~5,~1993
~--~Zaven~A.~KarianGF$C'@%-Fbt6$Fe_l%)listlistG>Fiu7#-F^o6$-%"$G6$&FSF>&FSFL/FN
;F?F7>FiuF:>FA-F86#Fiu>F<-%(convertG6$Fiu%"+G>F6-F_]m6$7#-F^o6$*$&FiuFTFG/FN;F?
FAFa]m*&,&F6F?*&F<FGFAFYFYF?,&FAF?FYF?FY6#%7Variance~of~the~list~LGF$%(RegAnalG
:F$63F\pFd^l%%xbarG%&xlistG%&ylistG%#CLG%#c1G%#c2G%#c3G%)alphahatG%(betahatG%*s
igma2hatG%)betahat1G%)betahat2G%*alphaconfG%)betaconfG%+sigma2confG6#%GMike,~An
drew,~and~Christine~were~here.GF$C?@$51F[`lF?2F^wF[`l-Fbjl6#%\pMust~have~list~o
f~lists~and~confidence~level~list,~or~(list,list,confidence~list)G>F6-F8Fd_l@%/
F[`lFGC%>FN7#-F^o6$&&Fe_lFh_lF>/F<Fbo>Fiu7#-F^o6$&Fh`mFLFi`m>FguF[uC%>FNFe_l>Fi
uF[u>FguFi`l>FA-%%MeanGFT>Fgv-FfamF\]m>F<.F<>F_z-%$sumG6$*&&FiuFh_lF?,&&FNFh_lF
?FAFYF?Fi`m>Fez-F]bm6$*$FabmFGFi`m>F]w*&F_zF?FezFY>F_y*&F6FY-F]bm6$*$,(F`bmF?Fg
vFY*&F]wF?FabmF?FYFGFi`mF?>&F[[lF>,&FgvF?*&-%#TPG6$,&F6F?FizF?,&F?F?Fddl#FYFGF?
-%%sqrtG6#,$*&F_yF?FgcmFY$"#5FYF?FY>&F[[lFL,&FgvF?FccmF?>&F][lF>,&F]wF?*&-Fecm6
$Fgcm,&F?F?&FguFLFicmF?-F[dm6#,$**F6F?F_yF?FgcmFYFezFYF_dmF?FY>&F][lFL,&F]wF?Fg
dmF?>&F``lF>*(F6F?F_yF?-%+ChisquarePG6$Fgcm,&F?F?&FguFj`lFicmFY>&F``lFL*(F6F?F_
yF?-Fgem6$Fgcm,$FjemF_[mFY>Fgt,&F?F?FddlFY>F^u,&F?F?F[emFY>Fav,&F?F?FjemFY-%'lp
rintG6#%hn-------------------------------------------------------------G-Fhfm6#
%X~~~~~~~~~~~~~~~~~Point~~~~~~Confidence~~~~~~~ConfidenceG-Fhfm6#%WParameter~~~
~~~Estimates~~~~~~~Level~~~~~~~~~~IntervalGFgfm-%'printfG6'%Oalpha~~~~~%13.4f~~
~%10.2f~~~~~~~[%1.4f,%1.4f]|+GFgvFgtFacmFbdm-FhfmF$-Fbgm6'%Obeta~~~~~~%13.4f~~~
%10.2f~~~~~~~[%1.4f,%1.4f]|+GF]wF^uFedmFaemFegm-Fbgm6'%Osigma^2~~~%13.4f~~~%10.
2f~~~~~~~[%1.4f,%1.4f]|+GF_yFavFdemF\fmFgfm6#%4Regression~AnalysisGF$%-Bernoull
iCDFG:6$'Fe^lFerFb\l6#F1Fe\lF$@'Fh\lFdx3Fi\l2F?F[]lF?-F`q6#-F]bm6$*&)F:F6F?),&F
?F?F:FY,&F?F?F6FYF?Fh]l6#%.Bernoulli~CDFGF$%(CauchySG:FjoFbhmFbpF$7#-F^o6$-F`q6
#-%$tanG6#,&*&%#PiGF?F\qF?F?F]jmFicm/F6Fhp6#%=Generates~sample~from~CauchyGF$%.
GraphRandWalkG:6&'%#pnGF\]l'%#psGF\]l'%#peGF\]l'%&stepsGF]p6'F0%$locGF`pFcsF+Fg
[mF$C)>F6-FC6#;F?,$9'FG>F<-FC6#;F?FG>F^`lFdx>&F<FLFdx?(FNF?F?Fd[nFOC&>FAF\q@)1F
AF:>F[\n,&F[\nF?F?F?1FA,&F:F?F[]lF?>F[\n,&F[\nF?FYF?1FA,(F:F?F[]lF?F[wF?>F^`l,&
F^`lF?F?F?>F^`l,&F^`lF?FYF?>&F6FWF^`l>&F6FfnF[\n>Fiu7#-F^o6$7$F^]nF`]n/FN;F?Fd[
n-FjnF\]m6#%?Graphic~display~of~random~walkGF$%'GammaSG:6%'F_pF\]l'F^sF\]lF[p61
%#WWGFg^lFap%#ayG%$ZeeGFgs%"qG%&thetaGFd^lFcsFbs%#U1G%#U2GFes%"PGF$F$C(@$1F:Fdx
-Fbjl6#%@First~argument~must~be~positiveG@$F`jl-Fbjl6#%ASecond~argument~must~be
~positiveG>FAFhv>FavF??(F$F?F?F$1FavF[w@%2F:F?C&>Fez-F`q6#*&,&-Fd]lF>F?F:F?F?F_
`nFY>F_y&-FayF>F>>F[[l*&FezF?F_yF?@%2F?F[[lC%>F]w-F`q6#,$-%#lnG6#*&,&FezF?F[[lF
YF?F:FYFY>F_zFa`n@$1F_z-F`q6#)F]w,&F:F?FYF?C$>F[fl*&F[]lF?F]wF?>FavFaclC%>F]w)F
[[l*$F:FY>F_zFa`n@$1F_z-F`q6#-Fd]l6#,$F]wFYC$>F[flFjan>FavFaclC.>FN-F`q6#*$-F[d
m6#,&F:FGFYF?FY>Fez-F`q6#,&F:F?-F]an6#""%FY>Fgt-F`q6#,&F:F?*$FNFYF?>F^u$"#XFY>F
gu,&F?F?-F]anFaalF?>F_yFa`n>F_zFa`n>F<-F`q6#*&FNF?-F]an6#*&F_yF?,&F?F?F_yFYFYF?
>F]w-F`q6#*&F:F?-Fd]lFh_lF?>Fiu*&F_yFGF_zF?>F6,(FezF?*&FgtF?F<F?F?F]wFY@%1Fdx-F
`q6#,(F6F?FguF?*&F^uF?FiuF?FYC$>F[flFjan>FavFacl@$1-F`q6#-F]anF\]mF6C$>F[flFjan
>FavFacl7#-F^o6$&FAFicl/FgvFjvF$F$%(Anova2sG:6#'%"DGF]\m63F_pFes%$totG%%SSTOG%$
SSAG%$SSBG%$SSEG%(RowMeanG%(ColMeanGF1Fcs%*GrandMeanG%$MSAG%$MSBG%$MSEG%$PVRG%$
PVCGFg[mF$CH>F6F7>F<-F86#F=>FAFdx>FNFdx>FiuFdx>FguFdx>FgtFdx>F^u-FC6#Fbo>Fav-FC
6#;F?F<?(F]wF?F?F<FO>FiwFdx?(FgvF?F?F6FO?(F]wF?F?F<FO>FA,&FAF?&&F:FiclFjwF?>F_y
*(FAF?F6FYF<FY?(FgvF?F?F6FO>&F^uFicl-Ffam6#Fjin?(F]wF?F?F<FOC$?(FgvF?F?F6FO>Fiw
,&FiwF?FiinF?>Fiw*&FiwF?F6FY?(FgvF?F?F6FO?(F]wF?F?F<FO>FN,&FNF?*$,&FiinF?F_yFYF
GF??(FgvF?F?F6FO>Fiu,&FiuF?*$,&F_jnF?F_yFYFGF??(F]wF?F?F<FO>Fgu,&FguF?*$,&FiwF?
F_yFYFGF?>Fiu*&F<F?FiuF?>Fgu*&F6F?FguF?>Fgt,(FNF?FiuFYFguFY>F_z*&FiuF?FewFY>Fez
*&FguF?,&F<F?FYF?FY>F[[l*(FgtF?FewFYFc\oFY>F][l,&F?F?-%%FCDFG6%Few*&FewF?Fc\oF?
*&F_zF?F[[lFYFY>F``l,&F?F?-Fi\o6%Fc\oF[]o*&FezF?F[[lFYFY-Fhfm6#%2~~~~~~~~~~~Sum
~ofG-Fhfm6#%I~~~~~~~~~~~Squares~~~Degrees~of~~Mean~SqG-Fhfm6#%hnSource~~~~~~(SS
)~~~~~~Freedom~~~~~(MS)~~~~~F-Ratio~~~~p-valueGFgfm-Fbgm6(%NRow(A)~~%10.4f~~~%5
d~~~%10.4f~~~%8.4f~~~%8.4fGFiuFewF_zF\]oF][lFegm-Fbgm6(%NCol(B)~~%10.4f~~~%5d~~
~%10.4f~~~%8.4f~~~%8.4fGFguFc\oFezFa]oF``lFegm-Fbgm6&%>Error~~~%10.4f~~~%5d~~~%
10.4fGFgtF[]oF[[lFegm-Fbgm6%%5Total~~~%10.4f~~~%5dGFN,&*&F6F?F<F?F?FYF?FegmFgfm
6#%ETwo~factor~ANOVA~(one~obs.~per~cell)GF$Ffam:F)6%%"SGF.F1Fg[mF$C$@%F[\mC%>F6
Fdx>F<Fdx?(FAF?F?F7FOC$>F6,&F6F?*&&&F:FiqF>F?&Fi_oFLF?F?>F<,&F<F?Fj_oF?C$>F6-F_
]m6$F:Fa]m>F<F7*&F6F?F<FY6#%>Arithmetic~mean~of~the~list~LGF$%&StDevG:F)F$Fg[mF
$-F[dm6#-Fb[mF96#%AStandard~deviation~of~the~list~LGF$%+BernoulliSG:6$'Fe^lF\]l
F[p6#Fh^n6#%CAugust~12,~1993~--~Zaven~A.~KarianGF$C%@$52F:Fdx2F?F:-Fbjl6#%GFirs
t~argument~must~be~between~0~and~1G>F67&FdxF]imF?F:-%*DiscreteSG6$F6F[]l6#%Cn~r
andom~nos.~from~Bernoulli~dist.GF$%,CorrelationG:F$6,FapFbsF.%#SXG%#SYG%#XYG%%S
umXG%%SumYGF1%$CXYGFaaoF$C/@$3Fj_l4F[\m-Fbjl6#%VWhen~one~argument~is~used,~it~m
ust~be~a~list~of~listsG@$3Fa`m43-Fbt6$Fe_lF,-Fbt6$F[uF,-Fbjl6#%PWhen~two~argume
nts~are~used,~both~must~be~listsG@$3Fa`m0F_`m-F8Fjt-Fbjl6#%IThe~two~lists~must~
be~of~the~same~lengthG@%Fj_lC$>F67#-F^o6$&&Fe_lF_clF>/Fav;F?F_`m>F<7#-F^o6$&F[e
oFLF\eoC$>F6Fe_l>F<F[u>FA-F8F\z>FN-Fe`oF\z>Fiu-Fe`oFh_l>FguFdx>FgtFdx>F^uFdx?(F
avF?F?FAFOC%>Fgu,&FguF?*&F^clF?&F<F_clF?F?>Fgt,&FgtF?F^clF?>F^u,&F^uF?FdfoF?>Fg
v*(,&*&FAF?FguF?F?*&FgtF?F^uF?FYF?FAFYF_^mFY-F`q6#*(FgvF?FiuFYFNFY6#%FMean~corr
elation~of~the~lists~X~and~YGF$%,PlotDiscCDFG:6$FcrFfr6*F0%$MINGFe^lF1Fjr%$MinG
%$MaxG%%newpGFe\lF$C*>Fgu-Fit6#F[]l>Fgt-F`uF^ho>F6<">F<Fgu>FAFdx>FiuF\t?(FNF?F?
,(FgtF?FguFYF?F?FOC&>F^u-%%evalG6#-%%subsG6$/FiuF<F:@$32FAF?1FdxF^u>FA,&FAF?Fjh
oF?>F6-%&unionG6$F6<#7$7$F<FA7$,&F<F?F?F?FA>F<F_jo-Fjn6$F6/Fdo%%blueG6#%EGraphi
c~display~of~distribution~exprGF$%(RunTestG:6$'Fap-F,6#%)realconsG'Fbs<$F][pF[[
p6'F]_oF[sFc\lF1%%runsG6#%VJoshua~D.~Levy~~|ir~~June~17,~1994,~modified~6/1/96-
zakGF$C&@%-Fbt6$F[]lF][p>F6-%$mapG6$-%(unapplyG6$-.%%signG6#,&F<F?-F`qF^hoFYF<F
:C&>F6-Fa_l6$7$-F]t6#-Fj[p6$F<-F`qF9-F]t6#-Fj[p6$FAFd\p:6$F_pFesF$6$%)operatorG
%&arrowGF$-%&evalbG6#2-F]tF9-F]tF^hoF$F$>F<Fdx>FAF?>F6-F[ioF\z>FiuF??(FNF?F?,&F
geoF?FYF?FO@$0&F6FT&F66#,&FNF?F?F?>Fiu,&FiuF?F?F?Fiu6#%gqRun~test.~Number~of~ru
ns~in~sorted,~combined~list~of~X~and~Y~-or-~number~of~runs~above~or~below~given
~numberGF$%-ExponentialSG:6$F_^nF[pFbhmFaaoF$C$@$F[_nF\_n7#-F^o6$-F`q6#,$*&F:F?
-Fcq6#,&F?F?F\qFYF?FY/F6;F?F[]l6#%BGenerates~sample~from~exponentialGF$Fgem:6$'
F`pFerFahm6&%$eqnGF_pF[sFc\lFaaoF$C'@$43-Fbt6$F:F\]lFi\l-%'RETURNG6#.-9!6#F\u@$
5F]]lFehm-Fbjl6#%HSecond~argument~must~be~between~0~and~1G>F<*&-%&GAMMAG6#,$F:F
_[mFY)FGF^bpFY>F6/F[]l-Fcu6$*(F<F?)FA,&F:F_[mFYF?F?-Fd]l6#,$FAFicmF?/FA;FdxFN-%
'fsolveG6%F6FN/FN;Fdx%)infinityG6#%6Chi~square~percentileGF$%+PoissonCDFG:6$'Fa
^lFerFb\lFbhm6#%BAugusr~8,~1993~--~Zaven~A.~KarianGF$@%Fh\lFdx-F`q6#-F]bm6$*(F[
imF?-Fd]l6#,$F:FYF?-%*factorialGF\zFYFh]l6#%,Poisson~CDFGF$%%N01SG:Fjo6(FcsF1Fb
^lFc^lFap%#P2GFbpF$C'>Fiu-FC6#;F?,&F:F?F?F?>F6F?>Fgu-F`q6#,$F]jmFG?(F<F?F?,&F:F
_[mF_[mF?FOC(>FAF\q>FNF\q>&FiuF\z-F`q6#*&-F[dm6#,$-FcqFiqFizF?-%$sinG6#*&FguF?F
NF?F?>F6,&F6F?F?F?>F\fp-F`q6#*&F`fpF?-%$cosGFffpF?>F6Fifp7#-F^o6$F`bm/F<Fhp6#%F
Generates~sample~from~standard~normalGF$%-ChisquarePDFG:6$Fd`pFiil6#F_pF[jlF$C&
@$3F[apF[_n-Fbjl6#%NFirst~argument~must~be~a~variable~or~positiveG@$F_jl-F^ap6#
Fdx>F6Fjap*(F6F?)F[]lFfbpF?-Fd]l6#,$F[]lFicmF?6#%3Chi~square~densityGF$%'GBDPDF
G:6''%#b1GFer'%#b2GFer'%#b3GFer'%#b4GFerFiil6$%"CG%#CCGF[jlF$C'@$3-Fbt6$F[wF\]l
1F[wFY-Fbjl6#%JThird~argument~must~be~a~variable~or~>~-1G@$3-Fbt6$Fd[nF\]l1Fd[n
FY-Fbjl6#%KFourth~argument~must~be~a~variable~or~>~-1G>F6*(-F\bp6#,(F[wF?Fd[nF?
FGF?F?-F\bp6#,&F[wF?F?F?FY-F\bp6#,&Fd[nF?F?F?FY>F<)*$F[]lFY,(F[wF?Fd[nF?F?F?**F
6F?F<F?),&9(F?F:FYF[wF?),(F:F?F[]lF?F]\qFYFd[nF?6#%9Generalized~beta~densityGF$
%#FSG:6%'%#n1GF]p'%#n2GF]pF[p6%F1F0%"BGFaaoF$C%>F<-%+ChisquareSG6$F:F[w>FA-F^]q
6$F[]lF[w7#-F^o6$**&F<F\zF?F[]lF?F:FY&FAF\zFYF[\l6#%8Generates~sample~from~FGF$
%%TPDFG:6$'%#dfGFerFiil6%%#C1G%#C2G%#C3GF[jlF$C'@$3F[ap4-Fbt6$F:F]p-Fbjl6#%XFir
st~argument~must~be~a~variable~or~a~positive~integerG>F6-F\bp6#Fgep>F<*&F[bpF?-
F[dm6#*&F:F?F]jmF?F?>FA),&F?F?*&F[]lFGF:FYF?Fgep*(F6F?F<FYFAFY6#%3Students~t~de
nsityGF$%*BinomialSG:6%'F.F]pF_aoF[p6%F0F1F+FaaoF$C'@$FeapFfap>F6-FC6#;F?,&F:FG
FGF??(F<FdxF?F:FOC$>&F66#,&F<FGF?F?F<>&F66#,&F<FGFGF?*(-%)binomialG6$F:F<F?)F[]
lF<F?),&F?F?F[]lFY,&F:F?F<FYF?>FA7#-F^o6$&F6Fh_l/F<Ff`q-F^bo6$FAF[w6#%:n~random
~nos.~from~B(n,p)GF$%/GraphRandWalk2G:6%FdjmFhjmFjjm6(F0F][n%#r1G%#r2GFcsF+Fg[m
F$C)>F6-FC6#;F?,$F[wFG>F<Ff[n>F^`lFdx>F[\nFdx?(FiuF?F?F[wFOC(>FAF\q>FNF\q@%F`\n
>F[\nFb\n>F[\nFf\n@%1FNF[]l>F^`lFj\n>F^`lF\]n>&F66#,&FiuFGFYF?F^`l>&F66#,$FiuFG
F[\n>Fgu7#-F^o6$7$F_dqFcdq/FiuFjv-Fjn6#FguFi]nF$%*XbarChartG:6%'FapF,'%+SampleS
izeGF]p'%%sbarGF\]l60F.%#XXGF]_o%%SbarGF\p%(XbarbarG%#A3GF1%'offsetG%$UCLG%$LCL
GFas%#P1GFjdpFhsF$C.>F6F7@%-Fbt6$F:F]\mC&>F<7#-F^o6$-Ffam6#&F:Faal/F^uFbo>FA7#-
F^o6$-Fe`oFjfqF\gq>FN-FfamFiq>FiuFehnC%>F<-%%copyGF9>FNF[w>FiuF[]l>Fgu-FfamFh_l
>Fgt,$*,-F[dmF\]mFY-F[dm6#,&FiuF?FYF?F?-F\bp6#,&FiuF_[mFicmF?F?-F[dmFLFY-F\bp6#
,$FiuF_[mFYF^w>Fav*&FgtF?FNF?>Fgv7$7$Fdx,&FguF?FavF?7$FifpF`iq>F]w7$7$Fdx,&FguF
?FavFY7$FifpFeiq>F_y7#-F^o6$7$F^uF`alF\gq>F_z-Fjn6$<$FgvF]wFco>Fez-Fjn6$F_yFcjo
-%%withG6$%&plotsG%(displayG-Fgjq6#<$F_zFez6#%HProduce~the~control~chart~for~th
e~mean~GF$F^bo:F$60F.F0Fj\qF_sF`s%$ptrGFjrF\sF1F`pFcsF+FdrF\pFg[mF$C/@$3Fa`m4Ff
co-Fbjl6#%VWhen~two~arguments~are~used,~the~first~must~be~a~listG@$3Fa`m4-Fbt6$
F[uF]p-Fbjl6#%]oWhen~two~arguments~are~used,~the~second~must~be~a~positive~inte
gerG@$3/F[`lF^w4-Fbt6$Fe_lFer-Fbjl6#%inWhen~three~arguments~are~used,~the~first
~must~be~an~expressionG@$3Fa\r4-Fbt6$F[uFhr-Fbjl6#%ZWhen~three~arguments~are~us
ed,~the~second~must~be~a~rangeG@$3Fa\r4-Fbt6$Fi`lF]p-Fbjl6#%^oWhen~three~argume
nts~are~used,~the~third~must~be~a~positive~integerG@%Fa\rC+>F_zFe_l>FezFi`l>Fgt
-F]t6#-F`t6%Fbt-Fdt6#F_zFet>FNFht>FiuF_u>FA-FC6#;F?,(FiuFGFNFizFGF?>FguF??(FavF
NF?FiuFOC%>&FAF]eqFav>&FA6#,&FguF?F?F?-F^io6$/FgtFavF_z>Fgu,&FguF?FGF?>F_y-F_]m
6$FAF,C$>F_yFe_l>FezF[u>F6,$-F8FhflF_[m>F<-FC6#;F?Fez>F^uF]in>&F^uF>&F_yFL?(Fav
FGF?F6FO>&F^uF_cl,&&F^u6#FcclF?&F_y6#,$FavFGF??(FavF?F?FezFOC&>FgvF\q@$2FgvFg`r
>Fdfo&F_yF>@$2&F^uF\zFgv>Fdfo&F_y6#,&F6FGFYF??(F]wFGF?F6FO@$32Fgv&F^uFjw1&F^u6#
,&F]wF?FYF?Fgv>Fdfo&F_yFiy7#-F^o6$Fdfo/FavFd`r6#%Gn~rand.~obs.~from~dist.~descr
ibed~by~LGF$%#QQG:F$60FapFbsF.%"MGFgeqF`^lFggoFh^n%#NYG%%NEWYG%&NEWYLGF1F`p%"fG
FaaoF$C/@$F]coF_co@$FccoFjco@%Fj_lC$>F67#-F^o6$&&Fe_lFhflF>/F_yF]eo>F<7#-F^o6$&
FcdrFLFddrC$>F6Fe_l>F<F[u>FAFgeo>FNFg_l@%1FAFNC$>Fiu-Fa_lF\z>Fgu-Fa_lFh_lC$>Fiu
Feer>FguFcer>Fgt-%$minG6$FAFN>Fgv-FC6#;F?Fgt>F^u7#-F^o6$*&F_yF?,&FgtF?F?F?FY/F_
yF`fr>Fav-F8F]eq?(F_yF?F?FgtFOC%>F_z-%&truncG6#*&&F^uFhflF?FaclF?>Fez,&F`grF?F_
zFY@%/FezFdx>&FgvFhfl&FguFb^r>Fggr,&FhgrF?*&FezF?,&&Fgu6#,&F_zF?F?F?F?FhgrFYF?F
?>F]w7#-F^o6$FggrFgfr-%)ScatPlotG6$FiuF]w6#%JProduce~the~Q-Q~plot~of~the~lists~
X~and~YGF$%*RandWalk2G:6&FdjmFhjmFjjmF[p6(FhbqFibqF0F][nFcsF1Fg[mF$C&>FA-FC6#Fg
]n>FNFf[n?(FguF?F?Fd[nFOC&>&FNF>Fdx>&FNFLFdx?(FiuF?F?F[wFOC&>F6F\q>F<F\q@%1F6F:
>Fgir,&FgirF?F?F?>Fgir,&FgirF?FYF?@%1F<F[]l>Feir,&FeirF?F?F?>Feir,&FeirF?FYF?>F
^_r7$FeirFgir7#-F^o6$F^_r/FguFg]n6#%4Path~of~random~walkGF$Fehr:F$6/FapFbsF.F0%
%MinxG%%MaxxG%%MinyG%%MaxyG%#XRG%#YRG%#EXG%#EYGF16#%DJanuary~27,~1994~--~Zaven~
A.~KarianGF$C2@$F]co-Fbjl6#%UWhen~one~argument~is~used~it~must~be~a~list~of~lis
tsG@$FccoFjco@$F^do-Fbjl6#%HThe~two~lists~must~have~the~same~lengthG@%Fj_lC$>F6
7#-F^o6$&&Fe_lFb^rF>/F_zF]eo>F<7#-F^o6$&F]]sFLF^]sC$>F6Fe_l>F<F[u>FAFgeo>FN-FC6
#;F?,$FAFG?(F_zF?F?FAFOC$>&FN6#,&F_zFGFYF?&F6Fb^r>&FN6#,$F_zFG&F<Fb^r>Fiu-FhgoF
\z>Fgu-FigoF\z>Fgt-FhgoFh_l>F^u-FigoFh_l>F]w,&Fgu#F?"#?Fiu#FYFd_s>F_y,&F^uFc_sF
gtFe_s>Fav;,&FiuF?F]wFY,&FguF?F]wF?>Fgv;,&FgtF?F_yFY,&F^uF?F_yF?-Fjn6&7#-F^o6$7
$F`^sFe^s/F_zF[^mFavFgv/%&styleG%&POINTG6#%DProduce~a~scatter~plot~of~X-Y~pairs
GF$%-GeometricCDFG:F`hmFbhmFe\lF$@%3Fi\l2F[]lF?Fdx-F`q6#-F]bm6$*&F:F?)F]imFewF?
F^`p6#%.Geometric~CDFGF$%+PercentileG:6$'F+-F,6#F\]lF_ao6'F\p%#LLGF\sF`p%#abGFa
aoF$C*@$FeapFfap>F6F7@$52F[]l*$FifpFY2*&F6F?FifpFYF[]l-Fbjl6#%:Percentile~does~
not~existG>F<-Fa_lF9>FA-F_]m6$*&FifpF?F[]lF?%)fractionG>FN-F^grFiq>Fiu,&FAF?FNF
Y,&Fa`lF?*&FiuF?,&&F<Fi^pF?Fa`lFYF?F?6#%FThe~100*p-th~percentile~of~the~list~LG
F$%3BivariateNormalPDFG:6)'%$muxGFer'%%varxGFerFiil'%$muyGFer'%%varyGFerFb\l'%$
rhoGFer6&F0Fj\qFhip%"QGF[jlF$C*@$F_jlFajl@$3-Fbt6$F]\qF\]l1F]\qFdx-Fbjl6#%NFift
h~argument~must~be~a~variable~or~positiveG@$3-Fbt6$9*F\]l52F\fsFY2F?F\fs-Fbjl6#
%YSeventh~argument~must~be~a~variable~or~between~-1~and~+1G>F6,$*&F]jmF?-F[dm6#
*(F[]lF?F]\qF?,&F?F?*$F\fsFGFYF?F?FG>F<,&*&F[[mFGF[]lFYF?*&,&9)F?Fd[nFYFGF]\qFY
F?>FA,$**F\fsF?F[[mF?F_gsF?-F[dm6#*&F[]lF?F]\qF?FYFiz>FN*&FifsFY,&F<F?FAF?F?*&F
6FY-Fd]l6#,$FNFYF?6#%9Bivariate~normal~densityGF$%&BetaPG:6%FcipFeipFahm6&Ff`pF
hipF[sFc\lFaaoF$C)@$43Fj`pF]jpF]ap@$1F:FY-Fbjl6#%<First~argument~must~be~>=~1G@
$1F[]lFY-Fbjl6#%=Second~argument~must~be~>=~1G@$52F[wFdx2F?F[w-Fbjl6#%GThird~ar
gument~must~be~between~0~and~1G>F<*(-F\bp6#,(F:F?F[]lF?FGF?F?-F\bp6#F`epFY-F\bp
6#,&F[]lF?F?F?FY>F6/F[w-Fcu6$*(F<F?)FAF:F?),&F?F?FAFYF[]lF?Fjbp-F]cp6%F6FN/FN;F
dxF?6#%0Beta~percentileGF$Fi\o:6%'%$df1GFer'%$df2GFerFb\l6&%$numG%$denGF[sF0Fe\
lF$C$@%3F]jpFdis>FNFdxC%>F6*(FebpF?-F\bp6#,&F:F_[mF[]lF_[mF?)*&F:F?F[]lFYF^bpF?
>F<*(F[bpF?-F\bp6#,$F[]lF_[mF?),&F?F?*(F:F?FAF?F[]lFYF?Fc\tF?>FN-F`q6#-Fcu6$Fb`
o/FA;FdxF[wFN6#%3F~distribution~CDFGF$Fecm:6$F^^qFahm6(Ff`pFa^qFb^qFc^qF[sFc\lF
aaoF$C)@$Fi`pF]ap@$FeapFfap>F<F^_q>FAFa_q>FN),&F?F?*&FiuFGF:FYF?Fgep>F6/F[]l-Fc
u6$*(F<F?FAFYFNFY/Fiu;,$FacpFYFgu-F]cp6$F6Fgu6#%6Students~t~percentileGF$%0Expo
nentialSumSG:6%F_^nF[p'%"mGF]p6&FapFbsF1FcsFaaoF$C&@$F[_nF\_n>F<Fhv?(FAF?F?F[wF
OC$>F6-F__p6$F:F[]l>&F<Fiq-F]bm6$Fg^p/FNF_`p7#-F^o6$F^`t/FAFjv6#%@Generates~sum
s~from~exponentialGF$%(Anova2mG:Fagn68F_pFesFfsFjgnF[hn%)CellMeanGF\hnFfgnFggnF
hgn%%SSABGFignF1FcsFd^lF]hnF^hn%%MSABGF_hnF`hnFahn%&PVIntGFg[mF$CO>F6F7>F<Fehn>
FA-F86#&F=F>>FNF]in>FiuF`in>Fgu-FC6$FboFbin>FgtFdx>F^uFdx>FavFdx>FgvFdx>F]wFdx>
F_yFdx?(F_zF?F?F6FOC%>&FNFb^rFdx?(FezF?F?F<FO?(F[[lF?F?FAFO>Fdbt,&FdbtF?&&&F:Fb
^r6#Fez6#F[[lF?>Fdbt*(FdbtF?F<FYFAFY?(FezF?F?F<FOC%>&FiuF\ctFdx?(F_zF?F?F6FO?(F
[[lF?F?FAFO>Fcct,&FcctF?FibtF?>Fcct*(FcctF?F6FYFAFY?(F_zF?F?F6FO?(FezF?F?F<FOC%
>&Fgu6$F_zFezFdx?(F[[lF?F?FAFO>F^dt,&F^dtF?FibtF?>F^dt*&F^dtF?FAFY?(F_zF?F?F6FO
?(FezF?F?F<FO?(F[[lF?F?FAFO>Fgt,&FgtF?FibtF?>Fgt**FgtF?F6FYF<FYFAFY?(F_zF?F?F6F
O?(FezF?F?F<FO?(F[[lF?F?FAFOC$>F^u,&F^uF?*$,&FibtF?FgtFYFGF?>F_y,&F_yF?*$,&Fibt
F?F^dtFYFGF??(F_zF?F?F6FO>Fav,&FavF?*$,&FdbtF?FgtFYFGF??(FezF?F?F<FO>Fgv,&FgvF?
*$,&FcctF?FgtFYFGF?>Fav*(F<F?FAF?FavF?>Fgv*(F6F?FAF?FgvF?>F]w,*F^uF?FavFYFgvFYF
_yFY>F][l*&FavF?FewFY>F``l*&FgvF?Fc\oFY>Fc`l*(F]wF?FewFYFc\oFY>86**F_yF?F6FYF<F
YF_^mFY>87,&F?F?-Fi\o6%Few*(F6F?F<F?F_^mF?*&F][lF?F_gtFYFY>88,&F?F?-Fi\o6%Fc\oF
fgt*&F``lF?F_gtFYFY>89,&F?F?-Fi\o6%F[]oFfgt*&Fc`lF?F_gtFYFYFb]o-Fhfm6#%I~~~~~~~
~~~~Squares~~Degrees~of~~~Mean~SqG-Fhfm6#%hnSource~~~~~~(SS)~~~~~Freedom~~~~~~(
MS)~~~~~F-Ratio~~~~p-valueGFgfm-Fbgm6(F]^oFavFewF][lFggtFbgtFegm-Fbgm6(F`^oFgvF
c\oF``lF]htFigtFegm-Fbgm6(%NInt(AB)~%10.4f~~~%5d~~~%10.4f~~~%8.4f~~~%8.4fGF]wF[
]oFc`lFchtF_htFegm-Fbgm6&Fc^oF_yFfgtF_gtFegm-Fbgm6%Ff^oF^u,&*(F6F?F<F?FAF?F?FYF
?FegmFgfm6#%JTwo~factro~ANOVA~(multiple~obs.~per~cell)GF$%+UniformPDFG:6$FfrFii
lFd]pFaaoF$C'>F6-FitF9>F<-F`uF9@$33Fi\l-Fbt6$F6F\]l2F[]lF6Fbhp@$33Fi\l-Fbt6$F<F
\]l2F<F[]lFbhp*$,&F<F?F6FYFY6#%0Uniform~densityGF$F^]q:6$'F`pF]pF[p6'F1FcsFapF0
F^s6#%@May~27,~1994~--~Zaven~A.~KarianGF$C'>FN-FC6#F_`p>FA-Fgdp6#*&F:F?F[]lF?>F
<F??(F6F?F?F[]lFOC$>&FNF\z-F_]m6$7#-F^o6$*$&FAF\]mFG/Fiu;F<,(F<F?F:F?FYF?Fa]m>F
<,&F<F?F:F?7#-F^o6$Fc\uF^`pFegpF$%#FPG:6%Fc[tFe[tFahm6'Ff`pFh[tFi[tF[sFc\lFaaoF
$C)@$FfhsF]ap@$FcisFfis@$5FfaoF]]l-Fbjl6#%EFirst~two~arguments~must~be~positive
G>F<*()FNFfbpF?Fa\tF?Fd\tF?>FA*(F[bpF?Fh\tF?),&F?F?*(F:F?FNF?F[]lFYF?Fc\tF?>F6/
F[w-Fcu6$*&F<F?FAFY/FN;FdxFiu-F]cp6%F6Fiu/FiuF`cp6#%-F~percentileGF$%*Wilcoxon2
G:6$Fjjo'FbsF[[p6*F]_oF\pF[sFc\l%"wGF1FcsFd^lFb[pF$C'>F6-Fa_l6$7$-F]t6#-Fj[p6$F
AF^]p-F]t6#-Fj[p6$FNFd\p:Fd]pF$Fe]pF$Fh]pF$F$>F<Fgeo>FiuFdx?(FguF?F?F<FOC$?(Fgt
FguF?Fc\o/-F]t6#&F66#Fgt-F]t6#&F66#FffrF$@%/FgtFgu>Fiu,&FiuF?*&-F[io6#-F^io6%/F
AFdx/FNF?&F6F]eqF?FguF?F?C$>Fiu,&FiuF?*&,&FguF?FgtF?F?-F[io6#-F^io6%F^buF_bu-F]
bm6$&F6Faal/F^u;FguFgtF?F_[m>FguFgtFiu6#%dqWilcoxon~test~for~equality~of~two~me
dians.~Returns~sum~of~ranks~of~Y~in~the~sorted~combination~of~X~and~YGF$%-Chisq
uareCDFG:6$Fd`pFb\l6$F_pF[sFe\lF$@%Fh\lFdxC$>F6Fjap-F`q6#-Fcu6$*(F6F?)F<FfbpF?-
Fd]l6#,$F<FicmF?/F<Fi]l6#%/Chi~square~CDFGF$%)RandWalkG:6'FdjmFfjmFhjmFjjmF[p6'
F0F][nF1FcsF`pFg[mF$C&>F6-FC6#;F?F]\q>F<Ff[n?(FAF?F?F]\qFOC&>F^`lFdx>F[\nFdx?(F
NF?F?Fd[nFOC$>FiuF\q@)1FiuF:>F[\nFb\n1FiuFd\n>F[\nFf\n1FiuFh\n>F^`lFj\n>F^`lF\]
n>&F6Fiq7$F^`lF[\n7#-F^o6$F_fu/FAF]euF^[sF$%,ContingencyG:6#'F+-F,6#-F,6#%*nonn
egintG6+%"hGFd^lF\p%$nprG%$npcGFd^nFfsF1Fcs6#%AJoshua~D.~Levy~~|ir~~June~21,~19
94GF$C2>F<F7>F6Fehn>FA-F]bm6$.-F_]m6$F[gqFa]m/F^uFbin>FN7#-F^o6$-F]bm6$&F[gqF_c
l/FavFboF]hu>Fiu7#-F^o6$-F]bm6$&&F:6#.F^uF_cl/F_iuFbinFehu>FguFdxFegm?(F^uF?F?F
<FOC&?(FavF?F?F6FO-Fbgm6$%'%7.0f~GFdhu-Fbgm6$%*~~%7.0f|+~G&FNFaal?(FavF?F?F6FOC
%>Fgt*(F[juF?&FiuF_clF?FAFY>Fgu,&FguF?-F`q6#*&,&FdhuF?FgtFYFGFgtFYF?-Fbgm6$%((%
6.2f)GFgtFegmFegm?(FavF?F?F6FO-Fbgm6$FgiuF`ju-Fbgm6$%'~%7.0fGFAFegmFegm-Fbgm6%%
VChi-square~statsistic~(%.0f~degrees~of~freedom):~%5g|+GF[]oFgu-Fbgm6$%/p-value
:~%.6g|+G,&F?F?-Fbcu6$F[]oFguFYFegm6#%2Contingency~tableGF$%)PoissonSG:6$'Fa^lF
\]lF[p6(F0%(SumProbGF1%%ProbG%+UpperLimitGF+Fg[mF$C,@$F[_nF\_n>F6-FC6#;F?"$+">F
<Fdx>FAFdx?(F$F?F?F$2F<$"$***FczC'>FN-F`q6#*()F:FAF?F`dpF?-FddpFiqFY>F<,&F<F?FN
F?>&F66#,&FAFGF?F?FA>&F66#,&FAFGFGF?FN>FA,&FAF?F?F?>Fj]vFA>F^^vFfq>FiuF`^v>Fgu7
#-F^o6$F_fu/FA;F?Fiu-F^bo6$FguF[]l6#%An~random~nos.~from~Poisson~dist.GF$%,Conf
IntPropG:6$'F`bsF]\m'%(ConfLevGF][p6-F+F0F1FcsF\pFc_t%&alphaG%"zGFe^lFhcrF_[r6#
%EFebruary~11,~1994~--~Zaven~A.~KarianGF$C+@$5F]]l2Fi\vF[]l-Fbjl6#%gnSecond~arg
ument~must~be~a~percentage;~i.e.~between~0~and~100G>FiuF7>FguFehn>Fgt,&F_[mF?F[
]l#F?"$+#>F^u-%(NormalPG6%FdxF?Fgt>F<-FC6#;F?Fedq>F]wF??(FAF?F?FiuFOC(>F6Fi_o>F
av*&-F]bm6$Fg^p/FN;F?FguF?FguFY>Fgv*&F^uF?-F[dm6#*(FavF?,&F?F?FavFYF?FguFYF?>&F
<Fjw-F`q6#,&FavF?FgvFY>&F<F^x-F`q6#,&FavF?FgvF?>F]wFax7#-F^o6$7$&F<6#,&FAFGFYF?
&F<6#F\^sFj^v6#%CCompute~confidence~intervals~for~pGF$%+UniformCDFG:6$FfrFb\l6$
Fa^lF`pFe\lF$C%>F6F^jt>F<F`jt@'33FdjtFi\lFfjtFdx33FjjtFi\lF\[uF?-F`q6#*&,&F[]lF
?F6FYF?F^[uFY6#%,Uniform~CDFGF$%+NormalSumSG:6&F^^n'FesF\]lF[pFb_tF$6#%@May~21,
~1994~--~Zaven~A.~KarianGF$C$@$F`jlF`_n-%(NormalSG6%F:*&F[wF?F[]lF?Fd[n6#%;Gene
rates~sums~from~normalGF$%.NormTransVarSG:Fjdv6%FapFbsF1FaaoF$C&@$F`jlF`_n>F<F_
ir?(FAF?F?Fd[nFOC$>F6-Faev6%F:F[]lF[w>F^`t*(,&F[wF?FYF?F?-Fb[mF\zF?F[]lFY7#-F^o
6$F^`t/FAFg]n6#%LGenerates~transformed~variances~from~normalGF$%*randomizeG:F$F
$Fg[mF$>%&_seedG-%&roundG6#,$-%%timeGF$"**ycM76#%<n~random~numbers~from~[0,1)G6
#F^gv%+GeometricSG:F^aoF_\vFaaoF$C)@$FeaoFhao>F6-FC6#;F?"$+&>F<Fdx>FAF?@%/F:F?C
%>&F6F>F?>&F6FLF?>FiuFGC&?(F$F?F?F$F]]vC'>FN*&F:F?)F]imF_^mF?>F<Fh]v>&F6F`cvFA>
&F6FccvFN>FAFb^v>FdivFA>FfivFfq>FiuF\^s>FguFg^vF\_v6#%Cn~random~nos.~from~geome
tric~dist.GF$%&RangeG:F)F$Fg[mF$,&-FigoF9F?-FhgoF9FY6#%4Range~of~the~list~LGF$%
*ResidualsG:F$66FapFbsF.Fb[sFc[sFf[sFg[s%#p2GFh^nFh[sFi[sF1F[sF+Fg_v%%betaG%$Re
sGFe^lFhcrFc_t6#%CAugust~21,~1993~--~Zaven~A.~KarianGF$C8@$3Fa`mF^co-Fbjl6#%]oW
hen~two~arguments~are~used,~the~first~two~must~be~a~list~of~listsG@$3Fa\rFdco-F
bjl6#%enWhen~three~arguments~are~used,~the~first~two~must~be~listsG@$3Fa\rF_doF
c\s@%Fa`mC%>F6F_dr>F<Ffdr>FbgtF[uC%>F6Fe_l>F<F[u>FbgtFi`l>FAFgeo@%/FbgtF?>Fez-%
'LinRegG6%F6F<F_z>Fez-%(PolyRegG6&F6F<FbgtF_z>F_gt-F[v6$FezF_z>F``l7#-F^o6$,&&F
<FhflF?-F_gt6#&F6FhflFY/F_yF[^m>FNFj^s>FiuF\_s>Fgv,&FiuFc_sFNFe_s>Fgu;,&FNF?Fgv
FY,&FiuF?FgvF?>F]w,&-Figo6#F``l$"+++++]!#6-FhgoFf^w$!+++++]Fi^w>Fgt;,&Fj^wF?F]w
FY,&Fe^wF?F]wF?>FavFbho?(F_yF?F?FAFO>Fav-Fiio6$Fav<#7$Fi]w&F``lFhfl>F^u-Fjn6'Fa
vFguFgtFg`sFco-FhalFaal-Fhfm6#%9~~~~~~~~~~~~~IndependentG-Fhfm6#%E~~~~~~~~~~~~~
~Variable~~~~~~ResidualG-Fhfm6#%E~~~~~~~~~~~~~-----------------------G?(F_yF?F?
FAFOC$-Fbgm6%%/~%20.4f~%13.4fGFi]wFh_wFegm6#%UProduce~scatter~plot~of~X-Y~pairs
~with~the~reg.~lineGF$%+PlotEmpPDFG:F$F^^l6#%@June~1,~1996~--~Zaven~A.~KarianGF
$C@>F<F`_l>FNFg_l@%Fj_lC%>F][lF^`l>F``lFa`l>Fc`lFd`lC%>F][lFht>F``lF_u>Fc`lFi`l
>F[[lFdx?(F^uF?F?FNFO@$F^al>F[[lFdal@$FfalFgal>FavF?>F6F^bl>FguFbbl>FgtFbbl?(F^
uF?F?FNFO@$FiblC$>F^clF`al>FavFacl>FNFccl>FAFecl>F]w-FC6#;F?,&Fc`lFGFicnF?>FiuF
adl>FddlF][l>FfdlFdx?(F^uFGF?FeblFOC$>FjdlF[el>F`elFdx@$Fbel>FcelFeel>F^uFG?(Fa
vF?F?FNFO@%Fjel>F]flF^flC$>F^uFafl>FavFccl>&F_zF>,&F][lF?FiuFicm>&FezF>Fdx>F_yF
G?(F^uF?F?Fc`lFOC%>Fgfl,&FjdlF?FiuF_[m>FjflF`el>F_yF\gl>&F_z6#,&Fc`lF?FGF?,&F``
lF?FiuF_[m>&FezF`ewFdx?(F^uF?F?FaewFOC$>F]hlF`hl>FbhlFehl7#-F^o6$Fjhl/F^u;F?Fae
wF]ilFbilF$%-ExponentialPG:6$Fa\lFahm6%Ff`pF[sFc\lFaaoF$C'@$Fi`pF]ap@$FeapFfap@
$F[_nF\_n>F6/F[]l-Fcu6$*&F:FY-Fd]l6#,$*&F<F?F:FYFYF?/F<;FdxFA-F]cp6%F6FA/FAF`cp
6#%7Exponential~percentileGF$%+RunningSumG:F)6%F.F0F1F2F$C'>F6F7>F<F]in>F^`lF=?
(FAFGF?F6FO>F^`t,&&F<6#F_^mF?Fi_oF?7#-F^o6$F^`t/FAFbo6#%6Running~sum~of~a~listG
F$%+ConfIntSucG:6$'F+F]\m'%&ValueGF][p6'F\pFh^lF1%$valGF`bs6#%AJune~13,~1994~--
~Zaven~A.~KarianGF$C(>FNFd\p>FiuF^]p>F6F[]m>F<Fdx?(FAF?F?F6FO@$31FN&&FiuFiqFL1&
F\jwF>FN>F<F_joF<6#%Rnumber~of~confidence~intervals~that~contain~valueGF$%-Conf
IntAvLenG:6#Fc_v6%F\p%$LenGF1F`iwF$C&>F6F7>F<Fdx?(FAF?F?F6FO>F<,(F<F?Fj_oF?Fh_o
FY*&F<F?F6FY6#%GAverage~length~of~confidence~intervalsGF$%'LocateG:6$Faeq'%%ite
mGFer6'F\pF0F_[rF1FcsFhsF$C'>F6F7>F<F]in>FAF??(FNF?F?F6FO@$/FSF[]lC$>F^`tFN>FAF
b^v7#-F^o6$&F<F\]m/Fiu;F?F_^m6#%KFind~the~indeces~in~the~list~X~of~the~itemGF$F
h\w:F$6-FapFbsF.FgboFhboFiboF1Fjbo%&slopeG%&constGF[sFaaoF$C/@$F_[w-Fbjl6#%hnWh
en~tow~arguments~are~used~the~first~must~be~a~list~of~listsG@$Fd[wFe[w@$Fi[wFad
o@%Fa`mC%>F67#-F^o6$&&Fe_lF`auF>/FgtF]eo>F<7#-F^o6$&Fj]xFLF[^x>F]wF[uC%>F6Fe_l>
F<F[u>F]wFi`l>FAFgeo>FNFdx>FiuFdx>FguFdx?(FgtF?F?FAFOC%>FN,&FNF?*&F_auF?&F<F`au
F?F?>Fiu,&FiuF?F_auF?>Fgu,&FguF?F__xF?>F^u-F`q6#*(,&*&FAF?FNF?F?*&FiuF?FguF?FYF
?FAFYF_^mFY>Fav*&F^uF?FdfvFY>Fgv,&F\hqF?*&-FfamF\zF?FavF?FY,&FgvF?*&FavF?F]wF?F
?6#%GSlope~and~intercept~of~regression~lineGF$%'Anova1G:6#'FcgnF,60Fc_tF\pFegnF
ign%$SSTGFfgnF.%#PVG%%XBarGF1FcsF\hn%$MSTGF_hnF\_lF$C=>F6F7>F<Fdx>FAFdx>FNFdx>F
iuFdx>FiuFdx>FgtF]in>FavF]in?(FgvF?F?F6FOC%>&FgtFicl-F8Fajn>&FavFiclF`jn>F<,&F<
F?FjaxF??(FgvF?F?F6FO?(F]wF?F?FjaxFOC$>FAFhin>FN,&FNF?*$,&FiinF?F]bxFYFGF?>F_y*
&FAF?F<FY?(FgvF?F?F6FO>Fiu,&FiuF?*&FjaxF?,&F]bxF?F_yFYFGF?>Fgu,&FNF?FiuF?>F_zF`
\o>Fez*&FNF?F^[uFY>F^u,&F?F?-Fi\o6%FewF^[uFhbmFYFb]oFe]o-Fhfm6#%hnSource~~~~~~(
SS)~~~~~~Freedom~~~~~(MS)~~~~~~F-Ratio~~~p-valueGFgfm-Fbgm6(%NTreat.~~%10.4f~~~
%5d~~~%10.4f~~~%8.4f~~~%8.4fGFiuFewF_zFhbmF^uFegm-Fbgm6&Fc^oFNF^[uFezFegm-Fbgm6
%Ff^oFguFc\oFegmFgfm6#%1One~factor~ANOVAGF$%%FPDFG:6%Fc[tFe[tFiil6$Fh[tFi[tF[jl
F$C(@$Ff^qFj^q@$3Fi\l4-Fbt6$F[]lF]p-Fbjl6#%YSecond~argument~must~be~a~variable~
or~a~positive~integerG@$3F]jp1F[wFdxFbhp>F6*()F[wFfbpF?Fa\tF?Fd\tF?>F<*(F[bpF?F
h\tF?),&F?F?*(F:F?F[wF?F[]lFYF?Fc\tF?Fb`o6#%*F~densityGF$Fay:FjoFbhmFg[mF$7#-F^
o6$-%&FloatG6$-%%randGF$!#7F^jm6#%<n~random~numbers~from~[0,1]GF$%,ConvolutionG
:6$'%#X1GF,'%#X2GF,64%%dim1G%%dim2G%#l1G%#l2G%#j1G%#j2GF1%#L1G%#L2G%#N1G%#N2GF0
Fd^lF/Fcs%#f1G%#f2GF^s6#%ESeptember~7,~1993~--~Zaven~A.~KarianGF$C:>Fiu-F]bm6$&
F:6#,$FgtFG/Fgt;F?,$F7F_[m>Fgu-F]bm6$&F[]lFfhx/Fgt;F?,$-F8F^hoF_[m@$52$F?!"(-Fi
jlFbhq2Ffix-Fijl6#,&FguF?FYF?-Fbjl6#%?Probabilities~must~add~up~to~1G?(FgtF?F?F
jhxFO@$2&F:6#,&FgtFGFYF?Fdx-Fbjl6#%LRandom~variable~values~must~be~non-negative
G?(FgtF?F?FaixFO@$2&F[]lFdjxFdxFfjx>F6,&F7F?F=FG>F<,&FbixF?&F[]lF>FG>FAF]in>FNF
`in>FiuF?>FguF??(FgtFdxF?,&F=F?FYF?FOC%>Fj\uFdx>&FA6#F\_pFdx>Fiu,&FiuF?FGF??(Fg
tF?F?F7FOC$>Fj\u&F:F`au>FiuF\_p?(FgtFdxF?,&Fa[yF?FYF?FOC%>&FNF]eqFdx>&FNFa_rFdx
>FguFg_r?(FgtF?F?FbixFOC$>Fh\y&F[]lF`au>FguFb_r>F^u7#-F^o6$&FAF`au/Fgt;F?Fchq>F
av7#-F^o6$&FNF`au/Fgt;F?F\jx>Fgv,$-F8FaalF_[m>F]w,$-F8F_clF_[m>F_y-FC6#;F?,(Fgv
FGF]wFGFizF??(F_zFdxF?,(FgvF?F]wF?FizF?FOC&>FezFdx?(F[[lFdxF?F_zFOC%@%52F[[lFdx
2,&FgvF?FYF?F[[l>F][lFdx>F][l&F^u6#,&F[[lFGFGF?@%52,&F_zF?F[[lFYFdx2FhbrF]`y>F`
`lFdx>F``l&Fav6#,(F_zFGF[[lFizFGF?>Fez,&FezF?*&F][lF?F``lF?F?>&F_y6#,&F_zFGF?F?
F_z>&F_y6#,&F_zFGFGF?Fez>F[[lFdx?(F$F?F?F$/&F_y6#,&F[[lF?FGF?Fdx>F[[lFday7#-F^o
6$&F_y6#Fc`l/Fc`l;FdalFi^y6#%YComputation~of~probabilities~via~the~convolution~
formulaGF$%(RegBandG:F$6CFapFbsF.F0Fb[sFc[sFd[sFe[sFf[sFg[sFh[sFi[sF1F[s%#MXGFg
_vFijv%%Sig2G%$SSQG%"TG%'OptionGFe_v%&Term1G%&Term2G%&upperG%&lowerG%#p1GFhjv%#
p3G%#p4GF+%%YminG%%YmaxGF[[wF$CF@$3Fa\rF^coF_co@$3/F[`lFicnFdcoFjco@$3FecyF_doF
c\s@%Fa\rC&>F6Fi\s>F<F`]s>F_htF[u>FigtFi`lC&>F6Fe_l>F<F[u>F_htFi`l>Figt&F\uFhcn
>FAFgeo>FNFi]s>F[[lF``x?(F_zF?F?FAFOC$>F`^sFc^s>Fe^sFh^s>FiuFj^s>FguF\_s>FgtF^_
s>F^uF`_s>F]wFb_s>F_yFg_s>FavFi_s>8B-Fh\w6%F6F<Fez>F``l-F]t6$F?-F]t6$FGFcey>F][
l,&-F]t6$F?FceyF?*&F``lF?F[[lF?F?>Fc`lFdx?(F_zF?F?FAFO>Fc`l,&Fc`lF?*$,(Fh^sF?F]
[lFY*&F``lF?,&Fc^sF?F[[lFYF?FYFGF?>Fc`l*&Fc`lF?FAFY>F_gt*&F_^mF?FdfvF?@%2FA"#L>
Fbgt-Fecm6$,&FAF?FizF?,$F_ht$F?Fiz>Fbgt-Fj`v6%FdxF?Fcgy>8:,&F][lF?*&F``lF?F`anF
?F?@%/FigtFhip>8;*&FbgtF?-F[dm6#**FAF?Fc`lF?FbgyFY,&*$FAFYF?*&F`anFGF_gtFYF?F?F
?>F_hy*&FbgtF?-F[dm6#**FAF?Fc`lF?FbgyFY,(F?F?FehyF?FfhyF?F?F?>8<,&FigyF?F_hyF?>
8=,&FigyF?F_hyFY>8C-F[fr6%F^`s-F^io6$/FezFiuFaiy-F^io6$/FezFguFaiy>8D-%$maxG6%F
_`s-F^io6$FiiyF^iy-F^io6$F\jyF^iy>Fgv;FdiyF^jy>8>-Fjn6'Fb`sFavFgvFg`s/Fdo%&blac
kG>8?-Fjn6&Fcey/FezFavFgvFco>8@-Fjn6&F^iyFb[zFgvFcjo>8A-Fjn6&FaiyFb[zFgvFcjoFcj
q-Fgjq6#<&FijyF_[zFd[zFh[zF[awF$%%FreqG:6$F*Ffr6'Fh^lF.F1FhgoFigoFaaoF$C*>FNF]h
o>FiuF`ho@$543-Fbt6$FNF\]l-Fbt6$FiuF\]l2FiuFN-Fbjl6#%RSecond~argument~must~be~a
~propoer~numerical~rangeG>F6-FC6#;FNFiu>F<F7?(FAFNF?FiuFO>F_fuFdx?(FAF?F?F<FO@$
31FNFi_o1Fi_oFiu>&F66#Fi_o,&F^^zF?F?F?7#-F^o6$F_fu/FAFd]z6#%@Frequencies~of~L~o
n~the~range~RGF$F]q:F$F$Fe]pF$FcfxF$F$%&BetaSG:6%'Ff\qF\]l'Fh\qF\]lF[p6'F1Fc\l%
#yyGF0FapFaaoF$C(@$F[_nF\_n@$F`jlF`_n>FiuFhv>FN-Fb\q6%,&F[]lFGFGF?Fg`qF[w?(F6F?
F?F[wFOC%>FA*(FbjsF?Fc\uF?F`epFY>F<*$Fb^vFY>F\fpF<7#-F^o6$F\fpF[\l6#%;Generates
~sample~from~betaGF$%0HypergeometricSG:6&Fe\qFg\qFc[uF[p6)%#lbG%#ubGF0F_[rF[sF+
F1Fj[sF$C)>F6-F`jy6$Fdx,&F[wF?F[]lFY>F<-F[fr6$F[wF:>FA-FC6#;F?,(F<FGF6FizFGF?>F
NF??(FiuF6F?F<FOC%>FeelFiu>&FAFi^p*(-Fdaq6$F:FiuF?-Fdaq6$F[]l,&F[wF?FiuFYF?-Fda
q6$Fd\nF[wFY>FN,&FNF?FGF?>Fgu7#-F^o6$Fe]y/FgtFdaz-F^bo6$FguFd[n6#%7Hypergeometr
ic~densityGF$%-UniformMeanSG:6%FfrF[pFb_tFhevFaaoF$C&@$543-Fbt6$F^jtF\]l-Fbt6$F
`jtF\]l2F`jtF^jt-Fbjl6#%GFirst~argument~must~be~a~numeric~rangeG>F<Fhv?(FAF?F?F
[wFOC$>F6-%)UniformSGF\`t>F^`tF``xFb`t6#%HGenerates~means~from~continuous~unifo
rmGF$%&OgiveG:6%F*FfrF[p6-FhgoFigo%%freqGF0Fap%$LEPG%$REPGFcs%$incGF1F.Fg[mF$C2
>F6F]ho>F<F`ho>FAFhv>FN-FC6#;F?,&F[wFGFGF?>F]wF7>FiuF_cs>FguF6>Fav*&F^[uF?F[wFY
>FgtF`iq?(F^uF?F?F[wFO>&FAFaalFdx?(F^uF?F?F[wFOC%?(FgvF?F?F]wFO@$2&FiuFiclFgt>F
afz,&FafzF?F?F?>FguFgt>FgtF`iq>FeirF6>FgirFdx?(F^uF?F?F[wFOC$>&FN6#,&F^uFGF?F?,
&&FNF^hlF?FavF?>&FN6#,&F^uFGFGF?*&FafzF?F]wFY7#-F^o6$7$&FN6#,&FgvFGFYF?&FN6#,$F
gvFG/Fgv;F?Fb[q-Fjn6%F_ilFcjoF`il6#%?Graphic~display~of~ogive~for~LGF$%%TCDFG:6
$F^^qFb\l6&Fa^qFb^qFc^qF[sF\_lF$C&>F6F^_q>F<Fa_q>FA),&F?F?*&FNFGF:FYF?Fgep-F`q6
#-Fcu6$Fi_q/FN;Fj^tF[]l6#%/Students~t~CDFGF$%0NormalVarianceSG:FjdvFhevFaaoF$C&
@$F`jlF`_n>F<F_ir?(FAF?F?Fd[nFOC$>F6F_fv>F^`tFdfvFefv6#%@Generates~variances~fr
om~normalGF$%#TSG:6$'%#nuGF]pF[pFi\qFaaoF$C%>F<-FgdpF^ho>FA-F^]qF\`t7#-F^o6$*&F
g]qF?-F[dm6#*&Fh]qF?F:FYFYF^`p6#%BGenerates~sample~from~Student's~tGF$%+Weibull
PDFG:6%'F_pFer'FesFerFiilFjilF[jlF$C'@$F]hpF^hp@$F_jlFajl@$F\\t-%'RETORNGFchp>F
6*(F:F?F[]lFY)*&F[wF?F[]lFYFganF?*&F6F?-Fd]l6#,$)Fj\[lF:FYF?6#%0Weibull~density
GF$%*NormalPDFG:6%'%#muGFer'FjrFerFiilFjgpF[jlF$C%@$F_jlFajl>F6*$-F[dm6#,$*&F]j
mF?F[]lF?FGFY*&F6F?-Fd]l6#,$F]gsFicmF?6#%/Normal~densityGF$%,BinomialPDFG:6%'F.
FerFahmFiilF$F\_lF$C(@$3F[ap4-Fbt6$F:%(integerGFj^q@$F]hp-Fbjl6#%YFirst~argumen
t~must~be~a~variable~or~a~~positive~integerG@$3Fi\lFeap-Fbjl6#%YSecond~argument
~must~be~an~expression~or~between~0~and~1G@$33F]jpF[ap5Fdis2F:F[wFbhp@$3F]jp54-
Fbt6$F[wF`_[lFdisFbhp*(-FdaqF_]qF?)F[]lF[wF?)Fhaq,&F:F?F[wFYF?6#%1Binomial~dens
ityGF$%)SignTestG:6#'Fhip%(booleanG6%F1Fd^l%%varsGFb[pF$C'@$4-Fbt6$7#&F\u6#;FGF
[`l-F,6#/FetF,-Fbjl6#%Yall~arguments~beyond~first~must~be~of~the~form~name=list
G>FAF_t@$/FAFbho-Fbjl6#%Etest~expression~contains~no~variableG@$0FA-Fdt6#Fha[l-
Fbjl6#%Ytest~expression~variable(s)~must~be~defined~in~argumentsG-F^io6%/FOF?/F
%Fdx-F_]m6$7#-F^o6$-Fi]p6#-F`q6#-F^io6$-F^o6$/-Fit6#&F\uF\z&-F`uFbd[lFh_l/F6F[b
[lF:/F<;F?-F86#F_uFa]m6#%RNumber~of~elements~in~list(s)~for~which~C~is~trueGF$%
+PlotEmpCDFG:F`\z6&F1F0F.FapFe\lF$C(>FAF7>FNF_cs>F<<#7$7$-F[fr6$F]hoFeirFdx7$Fe
irFdx?(F6F?F?F_^mFO@$2Fc\u&FN6#Fifp>F<-Fiio6$F<<#7$7$Fc\u*&F6F?FAFY7$F]f[lFef[l
>F<-Fiio6$F<<#7$7$FhqF?7$-F`jy6$F`hoFhqF?-Fjn6%F<FcoF`il6#%LGraphic~display~of~
empirical~distribution~LGF$%'GammaPG:6%F_\[lFa\lFahm6&Ff`pFesF[sFc\lFaaoF$C)@$F
fhsF]ap@$FcisFfis@$F[_nF\_n@$F`jlF`_n>F<*&-F\bpF9FY)F[]lF:FY>F6/F[w-Fcu6$*(F<F?
)FAFganF?-Fd]l6#,$*&FAF?F[]lFYFYF?FjbpF\cp6#%1Gamma~percentileGF$%)StemLeafG:6#
F\bs69F\p%&stemsG%'digitsG%#LsGFhr%)logscaleGF[s%*fracwidthG%)minwidthG%)maxwid
thGFdcr%&LabelG%'labelsGFcgnF1%&widthG%(stemnumG%&startG%'formatG%%leafG%%stemG
%)dispstemG%(tenstemG6#%AJoshua~D.~Levy~~|ir~~June~10,~1994GF$C:>F]w7&F?FG""&F`
dm>F_y.7&7#%"~G7'%"*GF^sFhcrFf[mFa]m7$F^[\lFa]mF[[\l>F6F7>FN-Fa_l6#F^]p>Fiu,&Fc
\uF?FeirFY@%32F?F[`lFj[r>FAF[u>FA-F[fr6$-%'lengthG6#-F]t6$F?FiuFG@%32FGF[`lFc]r
>F<Fi`l>F<-F`gv6#-F`q6#-F[dmF\z>Fgu,(FAF?-%'ilog10G6#*&FiuF?F<FYFYFYF?>FN7#-F^o
6$-F`gv6#*&)F`dmFguF?FgtF?/FgtFN>F^u*&Fe[\lF?F<FY>Fav)F`dm-F_]\lFaal>Fgv,$FavF`
dm>Fez-F^o6$-F`q6#-Fijl6#,&F^uF?*&&F]wF]ctF?FavF?FY/F[[l;F?Ficn-%'memberG6%-F[f
rF\ct7#Fez.F[[l>F][lFj^\l>F_z-F86#&F_yF]ct>F``l-%%iquoG6$FeirF][l>Fc`lFf`y>Fbgt
F?>F_gt-%$catG6%%$~%0G-F^\\lF_cl%$.0fG-Fbgm6#%0|+~~~Stem~~~LeafG?(FigtFc`lF][lF
$1FigtFc\uC'>F_ht-F[`\l6%FigtFgv.F`p>Figy*&FgvF?F_htF?-Fbgm6%%+|+%6.0f%c~|grGF_
ht&Fh_\l6#,&F?F?-%%iremG6$F``lF_zF??(FbgtFbgtF?F$31FbgtF62&FN6#Fbgt,&FigtF?F][l
F?-Fbgm6$F_gt,&F_b\lF?FigyFY>F``l,&F``lF?F?F?@$0FguFdx-Fbgm6$%X|+~~~~~~~~~~~~~~
~~~~~~~~~%.0f|+(Multiply~numbers~by~10~.)G,$FguFYFegm6#%>Ordered~stem-and-leaf~
displayGF$%)SkewnessG:F)6(%#scGFdcrF.Fg^lF1Fap6#%CAugust~19,~1993~--~Zaven~A.~K
arianGF$C)@%F[\m>Fgu7#-F^o6$-Fc\m6$&&F:F\]mF>&F^d\lFL/FiuFh\m>FguF:>F6Fdx>F<-Ff
amF]eq>FAFifr>FN*(F_^mF?-Fb[mF]eqF?FAFY?(FiuF?F?FAFO>F6,&F6F?*$,&&FguF\]mF?F<FY
F^wF?*(F6F?FAFYFN#FczFG6#%DSkewness~or~3rd~standardized~momentGF$%,ConfIntPlotG
:6$Fc_vF\iw6%F\pF0F1Fi_vF$C'>F6F7>F<Fbho?(FAF?F?F6FO>F<-Fiio6$F<<#7$7$Fh_oFA7$F
j_oFA@$Fa`m>F<-Fiio6$F<<#7$7$F[]lF?7$F[]lF6-Fjn6$F<Fcjo6#%HGraphic~display~of~c
onfidence~intervalsGF$%*NormalCDFG:6%Fe][lFg][lFb\l6#F^sF\_lF$C$>F6*&F[[mF?-F[d
m6#,$F[]lFGFY-F`q6#,&$Fgj[lFYF?-%$erfGF\zF[h\l6#%+Normal~CDFGF$%/UniformMedianS
G:FaczFhevFaaoF$C&@$FdczF\dz>F<Fhv?(FAF?F?F[wFOC$>F6Fcdz>F^`t-Fias6$F6F[h\lFb`t
6#%JGenerates~medians~from~continuous~uniformGF$%/NegBinomialCDFG:6%Fd`pFahmFb\
lFbhmFe\lF$@%3F\`[l2F[wF:Fdx-F`q6#-F]bm6$*(-Fdaq6$FewFganF?F`h[lF?)Fhaq,&F6F?F:
FYF?/F6;F:F[w6#%6Negative~binomial~CDFGF$Faev:6%'Ff][lF\]l'FjrF\]lF[p6+FcsF1Fjd
pFb^lFc^lF_pFesFap%)sqrt_varGFaaoF$C)@$F`jlF`_n>F^u-FC6#Ffhz>F6F?>FAFcep>Fav-F[
dmF^ho?(F<F?F?,&F[wF_[mF_[mF?FOC*>FNF\q>FiuF\q>Fgu*&-F[dm6#,$-FcqFTFizF?-Fefp6#
*&FAF?FiuF?F?>F[br-F`q6#,&*&FavF?FguF?F?F:F?>F6Fifp>Fgt*&Ff[]lF?-F_gpF[\]lF?>F[
br-F`q6#,&*&FavF?FgtF?F?F:F?>F6Fifp7#-F^o6$&F^uFh_l/F<Fjv6#%=Generates~sample~f
rom~normalGF$%1BivariateNormalSG:6('FcdsF\]l'FedsF\]l'FgdsF\]l'FidsF\]l'F[esF\]
lF[p6+F1Fb^lFc^lF_pFes%%cmuaG%%cmuyG%%cvarGF0FaaoF$C*@$F`jlF`_n@$1Fd[nFdx-Fbjl6
#%AFourth~argument~must~be~positiveG@$52F]\qFY2F?F]\q-Fbjl6#%IFifth~argument~mu
st~be~between~-1~and~+1G>F^u*&Fd[nF?,&F?F?*$F]\qFGFYF?>Fgu*&F]\qF?-F[dm6#*&Fd[n
F?F[]lFYF?>Fav-FC6$;F?F`gsFh[n?(F6F?F?F`gsFOC+>F<F\q>FAF\q>FN*&-F[dm6#,$-FcqFh_
lFizF?-Fefp6#,$*&F]jmF?FAF?FGF?>FN-F`q6#,&*&F^[]lF?FNF?F?F:F?>&Fav6$F6F?FN>Fgt,
&F[wF?*&FguF?,&FNF?F:FYF?F?>Fiu*&F``]lF?-F_gpFe`]lF?>Fiu-F`q6#,&*&-F[dmFaalF?Fi
uF?F?FgtF?>&Fav6$F6FGFiu7#-F^o6$7$F^a]lF^b]l/F6Fi_]l6#%GGenerates~sample~from~b
ivariate~normalGF$%/ExponentialPDFG:6$Fa\lFiilF$F[jlF$C%@$F]hpF^hp@$Fh\lFbhp*&F
:FY-Fd]l6#,$*&F[]lF?F:FYFYF?6#%5Exponentiall~densityGF$%(BetaCDFG:6%FcipFeipFb\
l6%FhipF[sF0Fe\lF$C$@'F\\t>FAFdx3F]jpFeis>FAF?C$>F6Fjis>FA-F`q6#-Fcu6$*(F6F?)F<
F:F?)FfqF[]lF?/F<Fd]tFA6#%)Beta~CDFGF$%&QQFitG:6%F*FcrFfr6)Fjr%)DataListG%)Dist
ListG%+NQuantilesGF^jv%*PlotRangeGF1F$F$C)>F6-F]t6#-F`t6%Fbt-FdtF^hoFet@$5/-F86
#7#F6Fdx2F?F\f]l-Fbjl6#%YThe~second~argument~must~have~exactly~one~varaible~in~
itG@'Fa`mC$>Fiu;Fj^tFacp>Fgu;FbjvFajvFa\rC$>FiuF[w>FguF[w-Fbjl6#%QThis~procedur
e~requires~either~2~or~3~arguments.G>FNF7>F<F_cs>FA7#-F^o6$-F]cp6%/*&FgtF?Fj^pF
YF[]lF6Fiu/FgtF`bl-Fjn6#<$-Fjn6$F[s/F[sFgu-Fehr6$FAF<F$F$Figo:F)F$Fg[mF$-F`jy6#
F\^p6#%<Maximum~value~of~the~list~LGF$%-ScatPlotLineG:F$63FapFbsF.F0Fb[sFc[sFd[
sFe[sFf[sFg[sFh[sFi[sF1F[sF[cyFhjvF+F[[wF$C6@$F]coF_co@$FccoFjco@$F^doFc\s@%Fj_
lC$>F6Fi\s>F<F`]sC$>F6Fe_l>F<F[u>FAFgeo>FNFi]s?(F_zF?F?FAFOC$>F`^sFc^s>Fe^sFh^s
>FiuFj^s>FguF\_s>FgtF^_s>F^uF`_s>F]wFb_s>F_yFg_s>FavFi_s>FgvF]`s>F``lFdey>F[[lF
``s>F][l-Fjn6%F``lFb[zFgvFcjq-Fgjq6#<$F[[lF][lF[awF$%,PlotPolyRegG:F$62FapFbsF0
F1Fd^lF\pFj\qFhipFcsFf[m%#BIGFf`pF[sFasFfsFc_tFj[sF$C6@$F_[w-Fbjl6#%inWhen~two~
arguments~are~used,~the~first~must~be~a~list~of~listsG@$Fd[wFe[w@$Fi[wFc\s>%'Di
gitsG"#]@%Fa`mC%>F67#-F^o6$&&Fe_lFTF>/FNF]eo>F<7#-F^o6$&F`\^lFLFa\^l>F][lF[uC%>
F6Fe_l>F<F[u>F][lFi`l>FguFgeo>Fgt-FC6$;F?,&F][lF?F?F?F`]^l>F^u-FC6$F`]^l;F?F?>&
Fgt6$F?F?Fgu?(FNF?F?Fa]^lFO?(FavFNF?Fa]^lFOC'@$/FavF?>FavFacl>FgvFdx>Fgv-F_]m6$
7#-F^o6$)&F6F\]m,(FNF?FavF?FizF?/FiuFiavFa]m>&Fgt6$FNFavFgv>&Fgt6$FavFNFgv>&F^u
Fh]^l-F_]m6$F<Fa]m?(FNFGF?Fa]^lFOC%>FgvFdx>Fgv-F_]m6$7#-F^o6$*&Fc\xF?)Fg^^l,&FN
F?FYF?F?Fi^^lFa]m>&F^u6$FNF?Fgv>F]w-&%'linalgG6#%(inverseGF`au>FA-&Ff`^l6#%)mul
tiplyG6$F]wF^u>F_yFdx?(FNF?F?Fa]^lFO>F_y,&F_yF?*&&FAFb`^lF?)F_zF_`^lF?F?>Fez-Fe
hr6$F6F<>F[[l-Fjn6$F_y/F_z;Fj^sF\_sFcjq-Fgjq6#<$FezF[[l6#%WProduce~scatter~plot
~of~X-Y~pairs~with~poly.~reg.~lineGF$%*CauchyPDFG:6#FiilF$6#%AJuly~16,~1993~--~
Zaven~A.~KarianGF$*&F]jmFY,&F?F?*$F:FGF?FY6#%/Cauchy~densityGF$%&CrapsG:F$6)F0F
cgnFcsF^s%&pointG%%rollG%%gameGF2F$C,>F6Ff\v>FAFG>F<-%$DieG6$""'FG>Fiu,&F^`lF?F
[\nF?>F_fuFiu>FAFb^v@'5/Fiu""(/Fiu"#6>FgtF?55/FiuFG/FiuF^w/Fiu"#7>FgtFY>FgtFdx?
(F$F?F?F$/FgtFdxC'>F<Fgc^l>FguF\d^l>F_fuFgu>FAFb^v@&/FguFiu>FgtF?/FguFbd^l>FgtF
Y@%/FgtFY>FhhvFdx>FhhvF?7#-F^o6$Fg^p/FNFe\x6#%Bsimulation~of~a~single~craps~gam
eGF$%2HypergeometricPDFG:6&'Ff\qFer'Fh\qFerFd`pFiilF$Fj[sF$C&@$33FejpF]jp2F[wFd
[n-Fbjl6#%YFourth~argument~cannot~be~larger~than~the~third~argumentG@$33FejpF[a
p2F:Fd[n-Fbjl6#%YFourth~argument~cannot~be~larger~than~the~first~argumentG@$33F
\g^lFi\l2F[]l,&F[wF?Fd[nFY-Fbjl6#%Z2nd~argument~cannot~be~smaller~than~the~3rd-
4th~argumentsG*(-Fdaq6$F:Fd[nF?-Fdaq6$F[]lF\h^lF?FbbzFYF]czF$%'MedianG:F)F$6#%@
May~26,~1994~--~Zaven~A.~KarianGF$-Fias6$F:F[h\l6#%5The~1n~of~the~list~LGF$%$GB
PG:6'F_ipFaipFcipFeipFahm6'Ff`pFhipFiipF[sFc\lFaaoF$C*@$433FghsFejpFbesF]ap@$F_
jp-Fbjl6#%<Third~argument~must~be~>=~1G@$Fgjp-Fbjl6#%=Fourth~argument~must~be~>
=~1G@$52F]\qFdxFi^]l-Fbjl6#%GFifth~argument~must~be~between~0~and~1G>F<F\[q>FAF
g[q>F6/F]\q-Fcu6$**F<F?FAF?)Fca]lF[wF?),(F:F?F[]lF?FNFYFd[nF?/FN;F:Fiu-F]cp6$F6
Fiu6#%<Generalized~beta~percentileGF$%)KurtosisG:F)6(%#sfGFdcrF.Fg^lF1FapFcc\lF
$C)@%F[\m>FguFhc\l>FguF:>F6Fdx>F<Fdd\l>FAFifr>FNFgd\l?(FiuF?F?FAFO>F6,&F6F?*$F]
e\lFicnF?*(F6F?FAFYFNFiz6#%DKurtosis~or~3rd~standardized~momentGF$%&GBCDFG:6'F_
ipFaipFcipFeipFb\l6&FhipFiipF[sF0Fe\lF$C$@'33F[apFbes2F]\qF:>FNFdx33Fi\lFbes2F[
]lF]\q>FNF?C%>F6F\[q>F<Fg[q>FN-F`q6#-Fcu6$**F6F?F<F?),&FAF?F:FYF[wF?),(F:F?F[]l
F?FAFYFd[nF?/FA;F:F]\qFN6#%5Generalized~beta~CDFGF$Fhgo:F)F$Fg[mF$-F[frFdh]l6#%
<Minimum~value~of~the~list~LGF$%(BetaPDFG:6%FcipFeipFiil6#FhipF[jlF$C'@$F]hpF^h
p@$F_jlFajl@$3F]jp5Fdex1F?F[wFbhp>F6Fjis*(F6F?)F[wF:F?),&F?F?F[wFYF[]lF?6#%-Bet
a~densityGF$%)UniformPG:6$FfrFahm6%F_pFesF[sFaaoF$C(>F6F^jt>F<F`jt@$433FdjtFjjt
Fi\lF]ap@$FeapFfap@$2F<F6-Fbjl6#%?First~argument~must~be~a~rangeG-F]cp6$/*&,&FA
F?F6FYF?F^[uFYF[]lFA6#%3uniform~percentileGF$%-ChisquareFitG:6&F*Fcr'%(ClassesG
F,'%%TypeG%'stringG63F.F1Fap%#NCG%%NumCGFjr%#XAGFcsF]es%#FrGFe^l%%pvalG%'C_Dadj
G%(PlotSetGF^fqFjdp%(lastargG6#%=May~23,~1994~--~May~23,~1994GF$CI@%FbfqC$>F6-F
]bm6$&&F:Fh_lFL/F<Fh\m>FA7#-F^o6$-Fc\m6$&F^c_lF>F]c_lF_c_lC$>F6F7>FAF:>FN-F8Fby
>FiuF_`^l>FguFde]l@$5/-F86#7#FguFdx2F?Fad_lF`f]l>Fgt-F_]m6$FAFC@%Fecy>F_zF[h\l>
F_z$F?!")?(F<F?F?F6FOC$@$2&FgtFh_l&F[wF>>Fae_lFbe_l@$1&F[wFT&FAFh_l>Fae_l,&Ffe_
lF?F_zFY>FA-Fa_l6#-F_]m6$FgtF,>Fgv-FC6#F[_v?(F<F?F?FiuFO>&FgvFh_lFdx>F^uF?>F<F?
?(F$F?F?F$1F^uF6@%31&F[wFh_lFafz2Fafz&F[w6#F_joC$>Fdf_l,&Fdf_lF?F?F?>F^uFafl>F<
F_jo@%Fecy>F_zF?>F_zFdx>F]wF`f_l>&F]wF>-F`q6#-F^io6$/Fgu,&&F[wFLF?F_zFYF[]l?(F<
FGF?FchqFO>&F]wFh_l-F`q6#,&-F^io6$/Fgu,&F^g_lF?F_zFYF[]lF?-F^io6$/Fgu,&F\g_lF?F
_zFYF[]lFY>&F]wF\]m-F`q6#,&F?F?-F^io6$/Fgu,&&F[wF\]mF?F_zFYF[]lFY>FavFdx?(F<F?F
?FiuFO>Fav,&FavF?*(,&Fdf_lF?*&F6F?Fdh_lF?FYFGF6FYFdh_lFYF??(F<F?F?FiuFO@$2F`j_l
FicnC$-Fbgm6%%UWarning:~Class~%3.0f~has~an~expected~frequency~of~%fGF<F`j_lFegm
@%Fecy>F_zF[h\l>F_zFdx@%Fecy>F``lFiu>F``lFN>Fez<#7&7$Fhi_lFdx7$Fhi_l*(&FgvF\]mF
?F6FY,&Ffe_lF?Fii_lFYFY7$,&&F[wFf^wF?F_zF?Fc[`l7$Fg[`lFdx?(F<F?F?FchqFO>Fez-Fii
o6$Fez<#7&7$F_i_lFdx7$F_i_l*(Fdf_lF?F6FY,&F^g_lF?F\g_lFYFY7$F[i_lFb\`l7$F[i_lFd
x>F[[l-Fjn6%FezFcjoF`il@%FecyC%>Fez<#7&Fa[`l7$Fhi_l*&Fai_lF?Fe[`lFY7$,&Fii_lF?F
_zF?F_]`l7$Fa]`lFdx?(F<F?F?FchqFO>Fez-Fiio6$Fez<#7&F`\`l7$F_i_l*&Fdh_lF?Fc\`lFY
7$F[i_lFj]`lFe\`l>F][l-Fjn6$FezFcoC$-%%diffG6$F[]lFgu>F][l-Fjn6$F_il/Fgu;Fbe_lF
fe_lFcjq-Fhal6#Fhj]l>F_y,&F?F?-F`q6#-Fbcu6$FchqFavFY-Fbgm6$%RThe~chi-square~goo
dness~of~fit~statistic~is~%7.4fGFavFegm-Fbgm6$%=The~number~of~classes~is~%3fGFi
uFegm-Fbgm6$%4The~p-value~for~%3fGFchq-Fbgm6$%=~degrees~of~freedom~is~%6.4fGF_y
FegmFegm6#%a[lTo~perform~a~Chi~square~goodness~~~~~~~~~of~fit~test~for~the~data
~in~L,~the~distribution~~~~~~~~~with~CDF~expr,~and~class~boundaries~given~by~Cl
asses.~~~~~~~~The~fourth~argument,~Type,~must~be~the~string~D~or~~~~~~~~C~to~in
dicate~a~discrete~or~a~continuous~type.G6&FdoFdjoFeoFail%)ProbHistG:F$6.F\pF+%#
lpG%#apGF0Fggo%$dimGF1Fe^lFjrFhgoFigo6#%DJanuary~26,~1994~--~Zaven~A.~KarianGF$
C&@$3Fj_lFc[r-Fbjl6#%WIf~one~argument~is~used,~it~must~be~a~probability~listG@$
3Fa`mFb\r-Fbjl6#%enIf~two~arguments~are~used,~the~first~must~be~an~expressionG@
$3Fa`mFj\r-Fbjl6#%VIf~two~arguments~are~used,~the~second~must~be~a~rangeG@%Fj_l
C)>F6F_`m>F<-FhgqFd_l>Fiu-FC6#;F?,$F6Ficn>FAF?>FNF??(F^uF?F?,$F6F_[mFOC,>Fi]m,&
F^`tF?$!"&FYF?>&FiuFi^pFdx>&Fiu6#FebzFi]m>&Fiu6#,&FNF?F^wF?&F<6#Fb^v>&Fiu6#,&FN
F?FicnF?,&F^`tF?F[h\lF?>&Fiu6#,&FNF?Fgj[lF?Fcc`l>&Fiu6#,&FNF?Fjc^lF?Ffc`l>&Fiu6
#,&FNF?Fbd^lF?Fdx>FA,&FAF?FGF?>FN,&FNF?Fd`lF?-Fjn6$7#-F^o6$7$&FiuF^hl&FiuFchl/F
^uFEFcjoC+>F]wFht>F_yF_u>Fgt,&-F^gr6#,(F_yF?F]wFY#F?"+++++5F?Fd`lFd`lF?>FiuF^fr
>FguF]w>Fgv-F]t6#-F`t6%Fbt-FdtFd_lFet?(F^uF?F?,(F_yF?F]wFYF?F?FOC,>Fav-F`q6#-F^
io6$/FgvFguFe_l>&Fiu6#,&F^uFd`lFgixF?,&FguF?Fhb`lF?>&Fiu6#,&F^uFd`l!"'F?Fdx>&Fi
u6#,&F^uFd`lFib`lF?Fbg`l>&Fiu6#,&F^uFd`l!"%F?Fav>&Fiu6#,&F^uFd`lFczF?,&FguF?F[h
\lF?>&Fiu6#,&F^uFd`lFizF?Fav>&Fiu6#,&F^uFd`lFYF?Feh`l>&Fiu6#,$F^uFd`lFdx>FguFb_
r7#-F^o6$F_e`l/F^u;F?,(F_yFicnF]wF`h`lFicnF?-Fjn6$F_ilFcjo6#%IGraphic~display~o
f~probability~histogramGF$%)TimePlotG:F$6*F.Fj\qF\pF1FcsF^sF]_oF0Fcc\lF$C)>F6F[
`l>FAF_`m>FgtFbho?(FNF?F?F6FOC$@$4-Fbt6$&F\uFTF,-Fbjl6#%<All~arguments~must~be~
listsG@$2FA-F86#Fjj`l>FAF`[al>F<Fi]s?(FNF?F?F6FOC%>F^uFjj`l?(FiuF?F?Fa^yFOC$>&F
<F`dqFiu>&F<Fddq&F^uF\]m>Fgt-Fiio6$Fgt<#7#-F^o6$7$&F<6#,&FguFGFYF?&F<6#,$FguFG/
Fgu;F?Fa^y-FjnF`au6#%;Time~series~plot~of~a~listGF$%,LogisticPDFG:Feb^lF$Ffb^lF
$*&F`dpF?,&F?F?F`dpF?Fiz6#%1Logistic~densityGF$%+PoissonPDFG:6$FgcpFiilF$F[jlF$
C%@$F]hpF^hp@$3Fi\l54-Fbt6$F[]lF`_[lF]]lFbhp*()F:F[]lF?F`dpF?-FddpF^hoFY6#%0Poi
sson~densityGF$%)WilcoxonG:6$'F+F[[p'Fc_tF][p6)F]_oF\pFh_uF[sF1FcsFd^l6#%AJoshu
a~D.~Levy~~|ir~~June~17,~1994GF$C)>F6-Fa_l6$7#-F^o6$-F`q6#,&FNF?F[]lFY/FNF::Fd]
pF$Fe]pF$-Fi]p6#2-FijlF9-FijlF^hoF$F$?(FiuF?F?F$/Fg^^lFdxF$>F6&F66#;FiuFgeo>F<F
geo>FAFdx?(FiuF?F?F<FOC$?(FguFiuF?Fc\o/-Fijl6#F`bu-Fijl6#&F6Fa_rF$@%Ffe^l>FA,&F
AF?*&-Fa\p6#Fg^^lF?FiuF?F?C$>FA,&FAF?*&,&FiuF?FguF?F?-F]bm6$.-Fa\pF^au/Fgt;FiuF
guF?F_[m>FiuFguFA6#%>Wilcoxon~test~for~one~median.GF$%*FastCrapsG:Fjo6(F0FcgnF1
F`c^lFac^lFbc^lF2F$C%>F6Ffp?(FAF?F?F:FOC'>F<Fgc^l>FNF\d^l@'5/FNFbd^l/FNFdd^l>Fg
uF?55/FNFG/FNF^w/FNF[e^l>FguFY>FguFdx?(F$F?F?F$/FguFdxC%>F<Fgc^l>FiuF\d^l@&/Fiu
FN>FguF?Fad^l>FguFY@%/FguFY>F_fuFdx>F_fuF?7#-F^o6$F_fuF]r6#%<simulation~of~n~cr
aps~gamesGF$Fj`v:6%Fe][lFg][lFahm6'Ff`pF^sFapF[s%&guessGFaaoF$C*@$FfhsF]ap@$Fci
sFfis@$F`jlF`_n>F<*&FNF?FghqFY>Fiu,&*$F[w$"$N"Fcz$"+R6Hj]!"**$Fi__lFieal$!+R6Hj
]F]fal>F6/F[w-F`q6#,&F[h\lF?-F]h\lFh_lF[h\l>FA-F]cp6%F6FN;,&FiuF?Fhb`lF?,&FiuF?
F[h\lF?,&*&F^[]lF?FAF?F?F:F?6#%2Normal~percentileGF$%,ConfIntMeanG:F$6/F`bsFh_v
F+F0F1F\pFc_tF_pFf[mF]_oFg_vFe_vF_[rFi_vF$C/@$554-Fbt6$F[uF\]l2F[uFdx2Fi\vF[uF_
`v@$3Fa\r1Fi`lFdx-Fbjl6#%OThird~argument,~when~present,~must~be~positiveG>F6Fe_
l>F_yF[u@$Fa\r>Fgv-F[dm6#Fi`l>FguFgeo>Fgt-F86#Fhhv>F]w,&F_[mF?F_yFf`v@%5Fa\r2"#
CFgt>F<-Fj`v6%FdxF?F]w>F<-Fecm6$,&FgtF?FYF?F]w>FN-FC6#;F?F[]al>F_zF??(FiuF?F?Fg
uFOC(>FAFg^^l>F^uFcgq@%Fa`m>Fav-Fe`oFiq>FavFgv>Fdbt-F`q6#,&F^uF?*(F<F?FavF?-F[d
mF`auFYFY>&FNF^hr-F`q6#,&F^uF?F[[blF?>F_z,&F_zF?FGF?7#-F^o6$7$&FNF`dq&FNFddqFi^
^l6#%RCompute~end-points~of~confidence~intervals~for~muGF$%/NegBinomialPDFG:6%F
d`pFahmFiilF$F\_lF$C'@$Ff_[l-Fbjl6#%VSecond~argument~must~be~a~variable~or~betw
een~0~and~1G@$F\_[l-Fbjl6#%PFirst~argument~must~be~a~variable~or~an~integerG@$3
F]jpFb`[lFbhp@$Fai\lFbhp*(-Fdaq6$FcfvFganF?F`h[lF?)FhaqF[[mF?6#%:Negative~binom
ial~densityGF$%)GammaCDFG:6%F_\[lFa\lFb\l6%FesF[sF0Fe\lF$C$@%F\\t>FAFdxC$>F6F^h
[l>FA-F`q6#-Fcu6$*(F6F?)F<FganF?-Fd]l6#,$*&F<F?F[]lFYFYF?Fgd]lFA6#%*Gamma~CDFGF
$%,NormalMeanSG:FjdvF$F\evF$C$@$F`jlF`_n-Faev6%F:*&F[]lF?F[wFYFd[n6#%<Generates
~means~from~normalGF$%,UniformSumSG:FaczFhevFaaoF$C&@$FdczF\dz>F<Fhv?(FAF?F?F[w
FOC$>F6Fcdz>F^`t-F_]m6$F6Fa]mFb`t6#%GGenerates~sums~from~continuous~uniformGF$F
ddz:6$FfrF[p6%F_pFesF1FaaoF$C&>F6F^jt>F<F`jt@$54Ff`_lFi`_l-Fbjl6#%NFirst~argume
nt~must~be~a~proper~numeric~rangeG7#-F^o6$-F`q6#,&*&F^[uF?F\qF?F?F6F?/FAF_`p6#%
IGenerates~sample~from~continuous~uniformGF$%*AnovaBetaG:F$63F\pFd^lFe^mFf^mFg^
mF\_mF]_mF^_mF__mF`_m%%sstoG%$ssrG%$sseG%$msrG%$mseGFhcrFe^lFd_mF$C>@$52F[`lF?F
d\\l-Fbjl6#%HMust~have~list~of~lists,~or~(list,list)G>F6F_`m@%Fj_lC$>FNFd`m>Fiu
F[amC$>FNFe_l>FiuF[u>FAFeam>FguFham>F<Fjam>FavF\bm>FgvFdbm>Fgt*&FavF?FgvFY>F]w-
F]bm6$*$,&F`bmF?FguFYFGFi`m>F_y-F]bm6$*&FgtFGFabmFGFi`m>F_z,&F]wF?F_yFY>FezF_y>
F[[l*&F_zF?FgcmFY>F][lFa]o>F``l,&F?F?-Fi\o6%F?FgcmF][lFY-Fhfm6#%jn-------------
--------------------------------------------------G-Fhfm6#%5~~~~~~~~~~~~~~Sum~o
fG-Fhfm6#%J~~~~~~~~~~~~~~Squares~~Degr~of~~~~Mean~SqG-Fhfm6#%in~~Source~~~~~~~(
SS)~~~~Freedom~~~~~~(MS)~~~~~F-Ratio~~~p-valueGFddbl-Fbgm6(%MRegression~%10.4f~
%5.0f~%13.4f~%10.4f~~%8.5fGF_yF?FezF][lF``lFegm-Fbgm6&%<~~Error~%13.4f~%5.0f~%1
3.4fGF_zFgcmF[[lFegm-Fbgm6%%5~~Total~%13.4f~%5.0fGF]wFewFegmFddbl6#%/Test~beta~
=~0.GF$Fhc^l:6$Fb_tF[p6$%$dieGF1Fg[mF$C$>F6-FgfxFgp7#-F^o6$-F6F$/F<F_`p6#%:n~ro
lls~of~an~m-sided~dieGF$%-DiscUniformSG:F^`bl6%F1F_pFesFbpF$C%>F<F^jt>FAF`jt7#-
F^o6$,&F<F?-F^gr6#*&,(FAF?F<FYF?F?F?F\qF?F?F^`p6#%GGenerates~sample~from~discre
te~uniformGF$%-GeometricPDFG:6$FahmFiilF$F[jlF$C%@$3F[apFeao-Fbjl6#%UFirst~argu
ment~must~be~a~variable~or~between~0~and~1G@$3Fi\l5F_^alF`asFbhp*&F:F?)F]im,&F[
]lF?FYF?F?6#%2Geometric~densityGF$%+BoxWhiskerG:F$6.F.F1F0FcgnFc_tFdcr%%MinnGFc
[s%$P25G%$P50G%$P75G%#ehGFcc\lF$C*>F6F[`l>Fgt-FhgoFd_l>F^u-FigoFd_l?(F<F?F?F6FO
@$4-Fbt6$&F\uFh_lF,F[[al>FAFbho?(F<F?F?F6FOC+>FNF]jbl>Fiu-FhgoFT>Fgu-FigoFT@$2F
iuFgt>FgtFiu@$2F^uFgu>F^uFgu>Fav-Fias6$FN$"#DFiz>Fgv-Fias6$FN$Fh[^lFiz>F]w-Fias
6$FN$"#vFiz>FA-Fiio6$FA<)7$7$FiuF<7$FavF<7$7$F]wF<7$FguF<7$7$Fav,&F<F?$F`h`lFYF
?7$F]wFf\cl7$7$Fav,&F<F?$FicnFYF?7$F]wF[]cl7$Fe\clFj\cl7$7$FgvFf\cl7$FgvF[]cl7$
Fh\clF]]cl>F_yFg_s-Fjn6&FAF]`s;FdxFifpFcjo6#%8Box-and~whisker~displayGF$%)Gamma
PDFG:6%F_\[lFa\lFiil6#FesF[jlF$C'@$F]hpF^hp@$F_jlFajl@$F\\tFbhp>F6F^h[l*(F6F?)F
[wFganF?-Fd]l6#,$Fj\[lFYF?6#%.Gamma~densityGF$%+MedianTestG:Fe_u6'F]_oF[sFc\lF1
Fd^lFb[pF$C(@'Fa`m@%-Fbt6$,&F7F?FbixF?%%evenG>Fiu,&F7F_[mFbixF_[m-Fbjl6#%Hsum~o
f~numbers~of~observations~not~evenGFc]r>FiuFi`l-Fbjl6#%.bad~argurmentG>F6-Fa_l6
$Fi\p:Fd]pF$Fe]pF$Fh]pF$F$>F<F?>FAFdx>F6Fa^p-F]bm6$Fg^p/FNF[_v6#%,Median~testGF
$%0MarginalRelFreqG:6#'F0F]\m60%#NAG%%rminG%%rmaxG%%cminG%%cmaxGF1F`pFfs%'RCOUN
TG%'CCOUNTG%'rcountG%'ccountG%#RCGFiipFg[mF$C1>F6F7>F<&F=FL>FAFjacl>FNFeat>FiuF
eat?(FguFGF?F6FOC&@$2&&F:F]eqFLF<>F<Fbbcl@$2FAFbbcl>FAFbbcl@$2&FcbclF>FN>FNFjbc
l@$2FiuFjbcl>FiuFjbcl@%2F<FN>FNF<>F<FN@%2FiuFA>FiuFA>FAFiu>Fav-FC6#;F<FA>FgvFb]
z?(FgtF<F?FAFOC%>F]wFdx?(FguF?F?F6FO@$/FbbclFgt>F]wF_x>&FavF`auF]w?(F^uFNF?FiuF
OC%>F_yFdx?(FguF?F?F6FO@$/FjbclF^u>F_yF\gl>&FgvFaalF_y>F_z7#-F^o6$*&FddclF?F6FY
/FgtFjccl>Fez7#-F^o6$*&F]eclF?F6FY/F^uFd]z7$FezF_z6#%VMarginal~relative~frequen
cies~of~the~list-of-lists,~AGF$%*ClassFreqG:Fjdz6)F.F1F0%#SLG%%bdryG%&deltaGF_[
rFe``lF$C)@%Fa`m>F6Fd`l>F6F[w>FAF]in>FNF_cs>Fgu*&,&F`hoF?F]hoFYF?F6FY>FgtF??(F<
F?F?F6FOC%>Fge_lFdx>Fiu,&*&F<F?FguF?F?F]hoF??(F$F?F?F$31Fgt-F8FT1F\^yFiuC$>Fge_
l,&Fge_lF?F?F?>FgtFffr7#-F^o6$Fge_lFi`m6#%UClass~Frequencies~of~L~on~the~range~
R~in~n~intervalsGF$%+ConfIntVarG:Fb_v6-F+F0F1F\pFc_t%#ssGF_[r%%chi1G%%chi2G%%CH
I1G%%CHI2GFi_vF$C-@$F]`vF_`v>FNF7>FiuFehn>F^u,&F_[mF?F[]l#FYFg`v>Fav,&F?F?F^uFY
>Fgv*&FchqF?-Fgem6$FchqF^uFY>F]w*&FchqF?-FgemF__`lFY>F<-FC6#;F?Fgn>FgtF??(FAF?F
?FNFOC'>F6Fi_o>FguFdfv>F__x*&FguF?F]wF?>&F<Fdau*&FguF?FgvF?>Fgt,&FgtF?FGF?7#-F^
o6$F^cv/FAF`bl6#%JCompute~confidence~intervals~for~sigma**2GF$%&KSFitG:F\e]l6-F
jrF`fclF.%#KSGF1F\s%%DOddG%&DEvenG%$LocGF^fqFjdp6#%@May~23,~1994~--~Zaven~A.~Ka
rianGF$C0>F6Fde]l@$Fje]lF`f]l>F<F_cs>FAFg_l>FNFdx?(FiuF?F?FAFOC&>Fgu-F^io6$/F6F
c\xF[]l>Fgt-F`q6#-Fijl6#,&*&FchqF?FAFYF?FguFY>F^u-F`q6#-Fijl6#,&*&FiuF?FAFYF?Fg
uFY@$2FN-F`jy6$FgtF^uC$>FNFd]dl>FavFiu>Fgv-F]e[l6$F<F[w>F]w-Fjn6%F[]l/F6F[wFcjo
Fcjq-Fhal6#-Fgjq6#F_jq-Fbgm6$%KThe~K-S~goodness~of~fit~statistic~of~%7.4fGFN-Fb
gm6$%2~occured~at~%6.4fGFdfoFegmFegm6#%`uTo~perform~a~Kolmogorov-Smirnov~goodne
ss~~~~~~~~~of~fit~test~for~the~data~in~L,~the~distribution~~~~~~~~~with~CDF~exp
r,~on~the~range~of~values~specified~~~~~~~~by~R.GF$%-BernoulliPDFG:F[hblF$6#%BA
ugust~9,~1993~--~Zaven~A.~KarianGF$C%@$3F[ap5F[_n1F?F:F_hbl@$3Fi\l5FeapF_^alFbh
p*&Fc^alF?)F]imFhaqF?6#%2Bernoulli~densityGF$%.NormalMedianSG:FjdvFhevFaaoF$C&@
$F`jlF`_n>F<F_ir?(FAF?F?Fd[nFOC$>F6F_fv>F^`tFih\lFefv6#%>Generates~medians~from
~normalGF$%,BinomialCDFG:6%Fi^[lFahmFb\lFbhmFe\lF$@'F\\tFdx3F\`[lF^`[lF?-F`q6#-
F]bm6$*(-Fdaq6$F:F6F?)F[]lF6F?)Fhaq,&F:F?F6FYF?/F6Fd]t6#%-Binomial~CDFGF$%-NegB
inomialSG:6%Fc[uF_aoF[pF_\vFaaoF$C,@$FeapFfap>F6Ff\v>F<Fdx>FAF:?(F$F?F?F$F]]vC'
>FN-F`q6#*(-Fdaq6$F_^mFganF?F`h[lF?)FhaqF_^_lF?>F<Fh]v>&F66#,(FAFGF:FizF?F?FA>&
F66#,(FAFGF:FizFGF?FN>FAFb^v>F\cdlFA>F`cdlFfq>FiuFbcdl>FguFg^v-F^bo6$FguF[w6#%K
n~random~nos.~from~negative~binomial~dist.GF$F\]w:F$60FapFbsF0F1F\pFj\qFhipFcsF
f[mF^[^lFf`pF[sFd^lFc_tFj[sF$C3@$Fbcy-Fbjl6#%[oWhen~three~arguments~are~used,~t
he~first~must~be~a~list~of~listsG@$Fdcy-Fbjl6#%ZWhen~four~arguments~are~used,~t
he~first~two~must~be~listsG@$FgcyFc\s>Fg[^lFh[^l@%Fa\rC&>F6F\\^l>F<Fc\^l>FezF[u
>F_yFi`lC&>F6Fe_l>F<F[u>FezFi`l>F_yFcdy>FiuFgeo>Fgu-FC6$;F?,&FezF?F?F?Fhedl>Fgt
-FC6$FhedlFe]^l>&FguFh]^lFiu?(FNF?F?FiedlFO?(F^uFNF?FiedlFOC'@$/F^uF?>F^uFafl>F
avFdx>Fav-F_]m6$7#-F^o6$)Fc^s,(FNF?F^uF?FizF?/F_zF[_vFa]m>&Fgu6$FNF^uFav>&Fgu6$
F^uFNFav>Fg]^lFb_^l?(FNFGF?FiedlFOC%>FavFdx>Fav-F_]m6$7#-F^o6$*&Fh^sF?)Fc^sF_`^
lF?F^gdlFa]m>&FgtFb`^lFav>Fgv-Fe`^lF]eq>FA-F[a^l6$FgvFgt>F]wFdx?(FNF?F?FiedlFO>
F]w,&F]wF?*&Fda^lF?)F_yF_`^lF?F?-F`q6$F]wF`dmFab^lF$F$
