This function takes a numeric count vector and returns estimated probabilities of the corresponding counts.
The following probability estimation methods are implemented in this function:
method = "empirical" : generates the relative frequency of the data x/sum(x).
estimate.probability(x, method = "empirical")a numeric probability vector.
# generate a count vector
x <- runif(100)
# generate a probability vector from corresponding counts
x.prob <- estimate.probability(x, method = 'empirical')