Help completed

R/lnpochhammer.R

@@ -11,8 +11,10 @@ lnpochhammer <- function(x, n) {
   #' @return Numeric value. The logarithm of the Pochhammer symbol.
   #' @details The Pochhammer symbol is given by:
   #' \deqn{ \displaystyle{ (x)_n = \frac{\Gamma(x+n)}{\Gamma(x)} = x (x+1) ... (x+n-1) } }
-  #' So:
+  #' So, if \eqn{n > 0}:
   #' \deqn{ \displaystyle{ log\left((x)_n\right) = log(x) + log(x+1) + ... + log(x+n-1) } }
+  #' 
+  #' If \eqn{n = 0}, \eqn{\displaystyle{ log\left((x)_n\right) = log(1) = 0}}
   #' @seealso [pochhammer()]
   #' @author Pierre Santagostini, Nizar Bouhlel
   #'

man/lnpochhammer.Rd

@@ -20,8 +20,10 @@ Computes the logarithm of the Pochhammer symbol.
 \details{
 The Pochhammer symbol is given by:
 \deqn{ \displaystyle{ (x)_n = \frac{\Gamma(x+n)}{\Gamma(x)} = x (x+1) ... (x+n-1) } }
-So:
+So, if \eqn{n > 0}:
 \deqn{ \displaystyle{ log\left((x)_n\right) = log(x) + log(x+1) + ... + log(x+n-1) } }
+
+If \eqn{n = 0}, \eqn{\displaystyle{ log\left((x)_n\right) = log(1) = 0}}
 }
 \examples{
 lnpochhammer(2, 0)