R/mcnby_ni_pp.R

Defines functions mcnby_ni_pp

Documented in mcnby_ni_pp

mcnby_ni_pp <- function(N,DEL0,N10,N01) {

ppost<- ppost_singleobs(N,DEL0,N10,N01) 

cat(" n =",N,"  del0 =",DEL0,"  n10 =",N10,"  n01 =",N01,
   "\n", "PPOST =", ppost)
#return("")
                                           }

Try the EQUIVNONINF package in your browser

Any scripts or data that you put into this service are public.

EQUIVNONINF documentation built on Sept. 19, 2017, 5:06 p.m.