diff --git a/R/est.prob.R b/R/est.prob.R index 12e459d..3a4d8b7 100644 --- a/R/est.prob.R +++ b/R/est.prob.R @@ -6,8 +6,6 @@ #' #' \itemize{ #' \item \code{method = "empirical"} : generates the relative frequency of the data \code{x/sum(x)}. -#' \item -#' \item #' } #' #' @param x a numeric vector storing count values. @@ -18,8 +16,7 @@ #' # generate a count vector #' x <- runif(100) #' # generate a probability vector from corresponding counts -#' # method = "empirical" -#' x.prob <- estimate.probability(x, method = "empirical") +#' x.prob <- estimate.probability(x, method = 'empirical') #' @export estimate.probability <- function(x, method = "empirical"){ diff --git a/man/estimate.probability.Rd b/man/estimate.probability.Rd index c2fafba..e3f433a 100644 --- a/man/estimate.probability.Rd +++ b/man/estimate.probability.Rd @@ -22,16 +22,13 @@ The following probability estimation methods are implemented in this function: \itemize{ \item \code{method = "empirical"} : generates the relative frequency of the data \code{x/sum(x)}. -\item -\item } } \examples{ # generate a count vector x <- runif(100) # generate a probability vector from corresponding counts -# method = "empirical" -x.prob <- estimate.probability(x, method = "empirical") +x.prob <- estimate.probability(x, method = 'empirical') } \author{ Hajk-Georg Drost