

   TThhee GGeeoommeettrriicc DDiissttrriibbuuttiioonn

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

   VVaalluuee::

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

        The geometric distribution has density

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

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

   EExxaammpplleess::

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

