

_T_h_e _G_e_o_m_e_t_r_i_c _D_i_s_t_r_i_b_u_t_i_o_n

     dgeom(x, prob)
     pgeom(q, prob)
     qgeom(p, prob)
     rgeom(n, prob)

_A_r_g_u_m_e_n_t_s:

     x,q: vector of quantiles representing the number of
          failures in a sequence of Bernoulli trials before
          success occurs.

       p: vector of probabilities.

       n: number of observations to generate.

    prob: probability of success in each trial.

_V_a_l_u_e:

     These functions provide information about the geometric
     distribution with parameter `prob'.  `dgeom' gives the
     density, `pgeom' gives the distribution function,
     `qgeom' gives the quantile function, and `rgeom' gen-
     erates random deviates.

     The geometric distribution with `prob' = p has density

                        p(x) = p (1-p)^x

     for x = 0, 1, 2, ...

_S_e_e _A_l_s_o:

     `dnbinom' for the negative binomial which generalizes
     the geometric distribution.

_E_x_a_m_p_l_e_s:

     pp <- sort(c((1:9)/10, 1 - .2^(2:8)))
     print(qg <- qgeom(pp, prob = .2))
     for(i in 1:2) print(qg <- qgeom(pgeom(qg, prob=.2), prob =.2))
     Ni <- rgeom(20, prob = 1/4); table(factor(Ni, 0:max(Ni)))

