Orlitsky's diminishing attenuation estimator (q2/3).

orlitsky(counts)

Arguments

counts

A vector of counts for which to approximate discrete probablities.

Value

A named vector `p` assigning a probability to each event in data. Those do not sum up to one since there is also a remaining probability to observe a new event given as p(new) = 1 - sum(p).

Examples

x <- sample(1:10, 100, replace=TRUE) p <- orlitsky(x)