Chapter 18 Apéndice D: Resumen de Distribuciones
Notas del usuario
- Las funciones
R
son de los paquetesactuar
einvgamma
. - Las tablas aparecen cuando el navegador las carga por primera vez. Para ocultarlas, haga clic en una de las distribuciones, por ejemplo, Poisson, y luego haga clic en el botón Ocultar.
- Más información sobre los códigos
R
está disponible en el sitio R Codes for Loss Data Analytics.
18.1 Distribuciones Discretas
Resumen. Esta sección resume las distribuciones de probabilidad discretas seleccionadas que se utilizan en Loss Data Analytics. Se proporcionan las funciones pertinentes y el código R
.
18.1.1 La clase (a,b,0)
Poisson
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis de los parámetros}} & \lambda>0 \\
\hline
~~p_0 & e^{-\lambda} \\
\hline
\small{\text{Función masa de probabilidad}} & \frac{e^{-\lambda}\lambda^k}{k!} \\
~~p_k & \\
\hline
\small{\text{Valor esperado}} & \lambda \\
~~\mathrm{E}[N] & \\
\hline
\small{\text{Varianza}} & \lambda \\
\hline
\small{\text{Función generadora de probabilidad}} & e^{\lambda(z-1)} \\
~~P(z) & \\
\hline
a \small{\text{ y }} b \small{\text{ para recursión}} & a=0 \\
& b=\lambda \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre Función} & \text{R Comando} \\
\hline
\small{\text{Función masa de probabilidad}} & \text{dpois}(x=, lambda=\lambda) \\
\hline
\small{\text{Función distribución}} & \text{ppois}(p=, lambda=\lambda) \\
\hline
\small{\text{Función cuantila}} & \text{qpois}(q=, lambda=\lambda) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rpois}(n=, lambda=\lambda) \\
\hline
\end{array}
\end{matrix}
\]
Geométrica
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \beta>0 \\
\hline
~~p_0 & \frac{1}{1+\beta} \\
\hline
\small{\text{Función masa de probabilidad}} & \frac{\beta^k}{(1+\beta)^{k+1}} \\
~~p_k & \\
\hline
\small{\text{Valor esperado}} & \beta \\
~~\mathrm{E}[N] & \\
\hline
\small{\text{Varianza}} & \beta(1+\beta) \\
\hline
\small{\text{Función generadora de probabilidad}} & [1-\beta(z-1)]^{-1} \\
~~P(z) & \\
\hline
a \small{\text{ y }} b \small{\text{ para recursión}} & a=\frac{\beta}{1+\beta} \\
& b=0 \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre Función} & \text{R Comando} \\
\hline
\small{\text{Función masa de probabilidad}} & \text{dgeom}(x=, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función distribución}} & \text{pgeom}(p=, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función cuantila}} & \text{qgeom}(q=, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rgeom}(n=, prob=\frac{1}{1+\beta}) \\
\hline
\end{array}
\end{matrix}
\]
Binomial
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & 0<q<1,~\text{m es un entero} \\
& 0 \leq k \leq m\\
\hline
~~p_0 &(1-q)^m \\
\hline
\small{\text{Función masa de probabilidad}} & \binom{m}{k}q^k(1-q)^{m-k} \\
~~p_k & \\
\hline
\small{\text{Valor esperado}} & mq \\
~~\mathrm{E}[N] & \\
\hline
\small{\text{Varianza}} & mq(1-q) \\
\hline
\small{\text{Función generadora de probabilidad}} & [1+q(z-1)]^m \\
~~P(z) & \\
\hline
a \small{\text{ y }} b \small{\text{ para recursión}} & a=\frac{-q}{1-q} \\
& b=\frac{(m+1)q}{1-q} \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre Función} & \text{R Comando} \\
\hline
\small{\text{Función masa de probabilidad}} & \text{dbinom}(x=, size=m, prob=p) \\
\hline
\small{\text{Función distribución}} & \text{pbinom}(p=, size=m, prob=p) \\
\hline
\small{\text{Función cuantila}} & \text{qbinom}(q=, size=m, prob=p) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rbinom}(n=, size=m, prob=p) \\
\hline
\end{array}
\end{matrix}
\]
Binomial Negativa
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & r>0, \beta>0 \\
\hline
~~p_0 & (1+\beta)^{-r} \\
\hline
\small{\text{Función masa de probabilidad}} & \frac{r(r+1)\cdots(r+k-1)\beta^k}{k!(1+\beta)^{r+k}} \\
~~p_k & \\
\hline
\small{\text{Valor esperado}} & r\beta \\
~~\mathrm{E}[N] & \\
\hline
\small{\text{Varianza}} & r\beta(1+\beta) \\
\hline
\small{\text{Función generadora de probabilidad}} & [1-\beta(z-1)]^{-r} \\
~~P(z) & \\
\hline
a \small{\text{ y }} b \small{\text{ para recursión}} & a=\frac{\beta}{1+\beta} \\
& b=\frac{(r-1)\beta}{1+\beta} \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre Función} & \text{R Comando} \\
\hline
\small{\text{Función masa de probabilidad}} & \text{dnbinom}(x=, size=r, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función distribución}} & \text{pnbinom}(p=, size=r, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función cuantila}} & \text{qnbinom}(q=, size=r, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rnbinom}(n=, size=r, prob=\frac{1}{1+\beta}) \\
\hline
\end{array}
\end{matrix}
\]
18.1.2 La clase (a,b,1)
Cero Truncada Poisson
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \lambda>0 \\
\hline
~~p^T_1 & \frac{\lambda}{e^\lambda-1} \\
\hline
\small{\text{Función masa de probabilidad}} & \frac{\lambda^k}{k!(e^\lambda-1)} \\
~~p^T_k & \\
\hline
\small{\text{Valor esperado}} & \frac{\lambda}{1-e^{-\lambda}} \\
~~\mathrm{E}[N] & \\
\hline
\small{\text{Varianza}} & \frac{\lambda[1-(\lambda+1)e^{-\lambda}]}{(1-e^{-\lambda})^2} \\
\hline
\small{\text{Función generadora de probabilidad}} & \frac{e^{\lambda z}-1}{e^\lambda-1} \\
~~P(z) & \\
\hline
a \small{\text{ y }} b \small{\text{ para recursión}} & a=0 \\
& b=\lambda \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre Función} & \text{R Comando} \\
\hline
\small{\text{Función masa de probabilidad}} & \text{dztpois}(x=, lambda=\lambda) \\
\hline
\small{\text{Función distribución}} & \text{pztpois}(p=, lambda=\lambda) \\
\hline
\small{\text{Función cuantila}} & \text{qztpois}(q=, lambda=\lambda) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rztpois}(n=, lambda=\lambda) \\
\hline
\end{array}
\end{matrix}
\]
Cero Truncada Geométrica
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \beta>0 \\
\hline
~~p^T_1 & \frac{1}{1+\beta} \\
\hline
\small{\text{Función masa de probabilidad}} & \frac{\beta^{k-1}}{(1+\beta)^k} \\
~~p^T_k & \\
\hline
\small{\text{Valor esperado}} & 1+\beta \\
~~\mathrm{E}[N] & \\
\hline
\small{\text{Varianza}} & \beta(1+\beta) \\
\hline
\small{\text{Función generadora de probabilidad}} & \frac{[1-\beta(z-1)]^{-1}-(1+\beta)^{-1}}{1-(1+\beta)^{-1}} \\
~~P(z) & \\
\hline
a \small{\text{ y }} b \small{\text{ para recursión}} & a=\frac{\beta}{1+\beta} \\
& b=0 \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre Función} & \text{R Comando} \\
\hline
\small{\text{Función masa de probabilidad}} & \text{dztgeom}(x=, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función distribución}} & \text{pztgeom}(p=, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función cuantila}} & \text{qztgeom}(q=, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rztgeom}(n=, prob=\frac{1}{1+\beta}) \\
\hline
\end{array}
\end{matrix}
\]
Cero Truncada Binomial
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & 0<q<1,~\text{m es un entero} \\
& 0 \leq k \leq m\\
\hline
~~p^T_1 & \frac{m(1-q)^{m-1}q}{1-(1-q)^m} \\
\hline
\small{\text{Función masa de probabilidad}} & \frac{\binom{m}{k}q^k(1-q)^{m-k}}{1-(1-q)^m} \\
~~p^T_k & \\
\hline
\small{\text{Valor esperado}} & \frac{mq}{1-(1-q)^m} \\
~~\mathrm{E}[N] & \\
\hline
\small{\text{Varianza}} & \frac{mq[(1-q)-(1-q+mq)(1-q)^m]}{[1-(1-q)^m]^2} \\
\hline
\small{\text{Función generadora de probabilidad}} & \frac{[1+q(z-1)^m]-(1-q)^m}{1-(1-q)^m} \\
~~P(z) & \\
\hline
a \small{\text{ y }} b \small{\text{ para recursión}} & a=\frac{-q}{1-q} \\
& b=\frac{(m+1)q}{1-q} \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre Función} & \text{R Comando} \\
\hline
\small{\text{Función masa de probabilidad}} & \text{dztbinom}(x=, size=m, prob=p) \\
\hline
\small{\text{Función distribución}} & \text{pztbinom}(p=, size=m, prob=p) \\
\hline
\small{\text{Función cuantila}} & \text{qztbinom}(q=, size=m, prob=p) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rztbinom}(n=, size=m, prob=p) \\
\hline
\end{array}
\end{matrix}
\]
Cero Truncada Binomial Negativa
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & r>-1, r\neq0 \\
\hline
~~p^T_1 & \frac{r\beta}{(1+\beta)^{r+1}-(1+\beta)} \\
\hline
\small{\text{Función masa de probabilidad}} & \frac{r(r+1)\cdots(r+k-1)}{k![(1+\beta)^r-1]}(\frac{\beta}{1+\beta})^k \\
~~p^T_k & \\
\hline
\small{\text{Valor esperado}} & \frac{r\beta}{1-(1+\beta)^{-r}} \\
~~\mathrm{E}[N] & \\
\hline
\small{\text{Varianza}} & \frac{r\beta[(1+\beta)-(1+\beta+r\beta)(1+\beta)^{-r}]}{[1-(1+\beta)^{-r}]^2} \\
\hline
\small{\text{Función generadora de probabilidad}} & \frac{[1-\beta(z-1)]^{-r}-(1+\beta)^{-r}}{1-(1+\beta)^{-r}} \\
~~P(z) & \\
\hline
a \small{\text{ y }} b \small{\text{ para recursión}} & a=\frac{\beta}{1+\beta} \\
& b=\frac{(r-1)\beta}{1+\beta} \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre Función} & \text{R Comando} \\
\hline
\small{\text{Función masa de probabilidad}} & \text{dztnbinom}(x=, size=r, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función distribución}} & \text{pztnbinom}(p=, size=r, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función cuantila}} & \text{qztnbinom}(q=, size=r, prob=\frac{1}{1+\beta}) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rztnbinom}(n=, size=r, prob=\frac{1}{1+\beta}) \\
\hline
\end{array}
\end{matrix}
\]
Logarítmica
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \beta>0 \\
\hline
~~p^T_1 & \frac{\beta}{(1+\beta)ln(1+\beta)} \\
\hline
\small{\text{Función masa de probabilidad}} & \frac{\beta^k}{k(1+\beta)^k \ln (1+\beta)} \\
~~p^T_k & \\
\hline
\small{\text{Valor esperado}} & \frac{\beta}{\ln (1+\beta)} \\
~~\mathrm{E}[N] & \\
\hline
\small{\text{Varianza}} & \frac{\beta[1+\beta-\frac{\beta}{ln(1+\beta)}]}{\ln (1+\beta)} \\
\hline
\small{\text{Función generadora de probabilidad}} & 1-\frac{ln[1-\beta(z-1)]}{\ln (1+\beta)} \\
~~P(z) & \\
\hline
a \small{\text{ y }} b \small{\text{ para recursión}} & a=\frac{\beta}{1+\beta} \\
& b=\frac{-\beta}{1+\beta} \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre Función} & \text{R Comando} \\
\hline
\small{\text{Función masa de probabilidad}} & \text{dnbinom}(x=,prob=\frac{\beta}{1+\beta}) \\
\hline
\small{\text{Función distribución}} & \text{pnbinom}(p=,prob=\frac{\beta}{1+\beta}) \\
\hline
\small{\text{Función cuantila}} & \text{qnbinom}(q=,prob=\frac{\beta}{1+\beta}) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rnbinom}(n=,prob=\frac{\beta}{1+\beta}) \\
\hline
\end{array}
\end{matrix}
\]
18.2 Distribuciones Continuas
Resumen. Esta sección resume una selección de distribuciones de probabilidad continuas que se utilizan en Loss Data Analytics. Se proporcionan funciones relevantes, código R
y gráficos ilustrativos.
18.2.1 Distribuciones Un Parámetro
Exponencial
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0 \\
\hline
\small{\text{Función densidad}} & \frac{1}{\theta}e^{-x/\theta} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & 1-e^{-x/\theta} \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \theta^k\Gamma(k+1) \\
~~\mathrm{E}[X^k] & k>-1 \\
\hline
VaR_p(x) & -\theta \ln (1-p) \\
\hline
\small{\text{Valor Esperado Limitado}} & \theta(1-e^{-x/\theta}) \\
~~\mathrm{E}[X\wedge x] & \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dexp}(x=, rate=1/\theta) \\
\hline
\small{\text{Función distribución}} & \text{pexp}(p=, rate=1/\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qexp}(q=, rate=1/\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rexp}(n=, rate=1/\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Inversa Exponencial
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0 \\
\hline
\small{\text{Función densidad}} & \frac{\theta e^{-\theta/x}}{x^2} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & e^{-\theta/x} \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \theta^k\Gamma(1-k) \\
~~\mathrm{E}[X^k] & k<1 \\
\hline
\mathrm{E}[(X\wedge x)^k] & \theta^kG(1-k;\theta/x)+x^k (1 - e^{-\theta/x}) \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dinvexp}(x=, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pinvexp}(p=, scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qinvexp}(q=, scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rinvexp}(n=, scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Un-Parámetro Pareto
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta~\text{es conocido},~x>\theta, \alpha > 0 \\
\hline
\small{\text{Función densidad}} & \frac{\alpha\theta^\alpha}{x^{\alpha+1}} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & 1-(\theta/x)^\alpha \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\alpha\theta^k}{\alpha-k} \\
~~\mathrm{E}[X^k] & k < \alpha \\
\hline
\mathrm{E}[(X\wedge x)^k] & \frac{\alpha\theta^k}{\alpha-k}-\frac{k\theta^{\alpha}}{(\alpha-k)x^{\alpha-k}} \\
& x \geq\theta \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dpareto1}(x=, shape=\alpha,min=\theta) \\
\hline
\small{\text{Función distribución}} & \text{ppareto1}(p=, shape=\alpha,min=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qpareto1}(q=, shape=\alpha,min=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rpareto1}(n=, shape=\alpha,min=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
18.2.2 Distribuciones Dos Parámetros
Pareto
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0, \alpha>0 \\
\hline
\small{\text{Función densidad}} & \frac{\alpha\theta^\alpha}{(x+\theta)^{\alpha+1}} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & 1-\Big(\frac{\theta}{x+\theta}\Big)^\alpha \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\theta^k\Gamma(k+1)\Gamma(\alpha-k)}{\Gamma(\alpha)} \\
~~\mathrm{E}[X^k] & -1<k<\alpha \\
\hline
\small{\text{Valor Esperado Limitado:}}~\alpha\neq1 & \frac{\theta}{\alpha-1}\Big[1-\Big(\frac{\theta}{x+\theta}\Big)^{\alpha-1}\Big] \\
~~\mathrm{E}[X\wedge x] & \\
\hline
\small{\text{Valor Esperado Limitado:}}~\alpha=1 & -\theta \ln \left(\frac{\theta}{x+\theta}\right) \\
~~\mathrm{E}[X\wedge x] & \\
\hline
\mathrm{E}[(X\wedge x)^k] & \frac{\theta^k\Gamma(k+1)\Gamma(\alpha-k)}{\Gamma(\alpha)}\beta(k+1,\alpha-k;\frac{x}{x+\theta})+x^k(\frac{\theta}{x+\theta})^\alpha \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dpareto}(x=, shape=\alpha, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{ppareto}(p=, shape=\alpha,scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qpareto}(q=, shape=\alpha,scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rpareto}(n=, shape=\alpha,scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Inversa Pareto
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0, \tau>0 \\
\hline
\small{\text{Función densidad}} & \frac{\tau\theta x^{\tau-1}}{(x+\theta)^\tau-1} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & \Big(\frac{x}{x+\theta}\Big)^\tau \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\theta^k\Gamma(\tau+k)\Gamma(1-k)}{\Gamma(\tau)} \\
~~\mathrm{E}[X^k] & -\tau<k<1 \\
\hline
\mathrm{E}[(X\wedge x)^k] & \theta^k\tau\int^{x/(x+\theta)}_0~y^{\tau+k-1}(1-y)^{-k}dy+x^k[1-\Big(\frac{x}{x+\theta}\Big)^\tau] \\
& k>-\tau \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dinvpareto}(x=, shape=\tau, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pinvpareto}(p=, shape=\tau,scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qinvpareto}(q=, shape=\tau,scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rinvpareto}(n=, shape=\tau,scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Loglogistic
Funciones \[ \begin{matrix} \begin{array}{l|c} \hline \text{Nombre} & \text{Función} \\ \hline \small{\text{Hipótesis parámetros}} & \theta>0, \gamma > 0, u=\frac{(x/\theta)^\gamma}{1+(x/\theta)^\gamma} \\ \hline \small{\text{Función densidad}} & \frac{\gamma(x/\theta)^\gamma}{x[1+(x/\theta)^\gamma]^2} \\ ~~ \small{\text{probabilidad }} f(x)& \\ \hline \small{\text{Función distribución}} & u \\ ~~F(x) & \\ \hline \textit{k}^{th}~\small{\text{momento}} & \theta^k\Gamma(1+(k/\gamma))\Gamma(1-(k/\gamma)) \\ ~~\mathrm{E}[X^k] & -\gamma<k<\gamma \\ \hline \mathrm{E}[(X\wedge x)^k] & \theta^k\Gamma(1+(k/\gamma))\Gamma(1-(k/\gamma))\beta(1+(k/\gamma),1-(k/\gamma);u)+x^k(1-u) \\ & k>-\gamma \\ \hline \end{array} \end{matrix} \] Gráfico ilustrativo
Paralogistic
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0, \alpha>0, u=\frac{1}{1+(x/\theta)^\alpha} \\
\hline
\small{\text{Función densidad}} & \frac{\alpha^2(x/\theta)^\alpha}{x[1+(x/\theta)^\alpha]^{\alpha+1}} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & 1-u^\alpha \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\theta^k\Gamma(1+(k/\alpha))\Gamma(\alpha-(k/\alpha))}{\Gamma(\alpha)} \\
~~\mathrm{E}[X^k] & -\alpha<k<\alpha^2 \\
\hline
\mathrm{E}[(X\wedge x)^k] & \frac{\theta^k\Gamma(1+(k/\alpha))\Gamma(\alpha-(k/\alpha))}{\Gamma(\alpha)}\beta(1+(k/\alpha),\alpha-(k/\alpha);1-u)+x^ku^\alpha \\
& k>-\alpha \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dparalogis}(x=, shape=\alpha, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pparalogis}(p=, shape=\alpha,scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qparalogis}(q=, shape=\alpha,scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rparalogis}(n=, shape=\alpha,scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Gamma
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0,~\alpha>0 \\
\hline
\small{\text{Función densidad}} & \frac{1}{\theta^{\alpha}\Gamma(\alpha)}x^{\alpha-1}e^{-x/\theta} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & \Gamma(\alpha;\frac{x}{\theta}) \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \theta^k\frac{\Gamma(\alpha+k)}{\Gamma(\alpha)} \\
~~\mathrm{E}[X^k] & k>-\alpha \\
\hline
& \frac{\theta^k\Gamma(k+\alpha)}{\Gamma(\alpha)}\Gamma(k+\alpha; x/\theta)+x^k[1-\Gamma(\alpha; x/\theta)] \\
~~\mathrm{E}[X\wedge x]^k & k > -\alpha \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\small{\text{Función densidad}} & \text{dgamma}(x=, shape=\alpha, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pgamma}(p=, shape=\alpha,scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qgamma}(q=, shape=\alpha,scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rgamma}(n=, shape=\alpha,scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Inversa Gamma
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Función densidad}} & \frac{(\theta/x)^\alpha e^{-\theta/x}}{x\Gamma(\alpha)} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & 1-\Gamma(\alpha;\theta/x) \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\theta^k\Gamma(\alpha-k)}{\Gamma(\alpha)} \\
~~\mathrm{E}[X^k] & k<\alpha \\
\hline
\mathrm{E}[(X\wedge x)^k] & \frac{\theta^k\Gamma(\alpha-k)}{\Gamma(\alpha)}[1-\Gamma(\alpha-k;\theta/x)]+x^k\Gamma(\alpha;\theta/x) \\
& \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dinvgamma}(x=, shape=\alpha, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pinvgamma}(p=, shape=\alpha,scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qinvgamma}(q=, shape=\alpha,scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rinvgamma}(n=, shape=\alpha,scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Weibull
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0,\alpha>0 \\
\hline\
\small{\text{Función densidad}} & \frac{\alpha \Big(\frac{x}{\theta}\Big)^\alpha \exp\Big(-\Big(\frac{x}{\theta}\Big)^\alpha\Big)}{x} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & 1-\exp\Big(-\Big(\frac{x}{\theta}\Big)^\alpha\Big) \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \theta^k \Gamma(1 + \frac{k}{\alpha}) \\
~~\mathrm{E}[X^k] & k>-\alpha \\
\hline
\mathrm{E}[(X\wedge x)^k] & \theta^k\Gamma(1+\frac{k}{\alpha})\Gamma\Big[1+\frac{k}{\alpha};\Big(\frac{x}{\theta}\Big)^\alpha\Big]+x^k\exp\Big(-\Big(\frac{x}{\theta}\Big)^\alpha\Big) \\
& k>-\alpha \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dweibull}(x=, shape=\alpha, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pweibull}(p=, shape=\alpha,scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qweibull}(q=, shape=\alpha,scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rweibull}(n=, shape=\alpha,scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Inversa Weibull
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0,\tau>0 \\
\hline\
\small{\text{Función densidad}} & \frac{\tau(\theta/x)^\tau \exp\Big(-\Big(\frac{\theta}{x}\Big)^\tau\Big)}{x} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & \exp\Big(-\Big(\frac{\theta}{x}\Big)^\tau\Big) \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \theta^k\Gamma(1-(k/\tau)) \\
~~\mathrm{E}[X^k] & k<\tau \\
\hline
\mathrm{E}[(X\wedge x)^k] & \theta^k\Gamma(1-(k/\tau))[1-\Gamma(1-(k/\tau);(\theta/x)^\tau)]+x^k[1-e^{-(\theta/x)^\tau}] \\
& \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dinvweibull}(x=, shape=\tau, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pinvweibull}(p=, shape=\tau,scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qinvweibull}(q=, shape=\tau,scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rinvweibull}(n=, shape=\tau,scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Uniforme
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & -\infty<\alpha<\beta<\infty \\
\hline
\small{\text{Función densidad}} & \frac{1}{\beta-\alpha} \\
\text{f(x)} & \\
\hline
\small{\text{Función distribución}} & \frac{x-\alpha}{\beta-\alpha} \\
~~F(x) & \\
\hline
\text{Mean} & \frac{\beta+\alpha}{2} \\
\text{E[X]} & \\
\hline
\text{Variance} & \frac{(\beta-\alpha)^2}{12} \\
E[(X-\mu)^2] & \\
\hline
\mathrm{E}[(X-\mu)^k] & \mu_k=0~~~\text{for odd }\textit{k} \\
& \mu_k=\frac{(\beta-\alpha)^k}{2^k (k+1)}~~~\text{for even }\textit{k} \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dunif}(x=, min=a, max=b) \\
\hline
\small{\text{Función distribución}} & \text{punif}(p=, min=a, max=b) \\
\hline
\small{\text{Función cuantila}} & \text{qunif}(q=, min=a, max=b) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{runif}(n=, min=a, max=b) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Normal
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & -\infty<\mu<\infty,~\sigma>0 \\
\hline
\small{\text{Función densidad}} & \frac{1}{\sqrt{2\pi}\sigma} \exp\left( -\frac{(x-\mu)^2}{2\sigma^2}\right) \\
\text{f(x)} & \\
\hline
\small{\text{Función distribución}} & \Phi\left(\frac{x-\mu}{\sigma}\right) \\
~~F(x) & \\
\hline
\text{Mean} & \mu \\
\text{E[X]} & \\
\hline
\text{Variance} & \sigma^2 \\
E[(X-\mu)^2] & \\
\hline
\mathrm{E}[(x-\mu)^k] & \mu_k=0~~~\text{para k par} \\
& \mu_k=\frac{k!\sigma^2}{(\frac{k}{2})! 2^{k/2}}~~~\text{para k impar} \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dnorm}(x=, mean=\mu, sd=\sigma) \\
\hline
\small{\text{Función distribución}} & \text{pnorm}(p=, mean=\mu, sd=\sigma) \\
\hline
\small{\text{Función cuantila}} & \text{qnorm}(q=, mean=\mu, sd=\sigma) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rnorm}(n=, mean=\mu, sd=\sigma) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Cauchy
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & -\infty <\alpha <\infty, \beta>0 \\
\hline
\small{\text{Función densidad}} & \frac{1}{\pi\beta}[1+\left( \frac{x-\alpha}{\beta}\right)^2]^{-1} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dcauchy}(x=, location=\alpha, scale=\beta) \\
\hline
\small{\text{Función distribución}} & \text{pcauchy}(p=, location=\alpha, scale=\beta) \\
\hline
\small{\text{Función cuantila}} & \text{qcauchy}(q=, location=\alpha, scale=\beta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rcauchy}(n=, location=\alpha, scale=\beta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
18.2.3 Distribuciones Tres Parámetros
Generalizada Pareto
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0, \alpha>0, \tau>0, u=\frac{x}{x+\theta} \\
\hline
\small{\text{Función densidad}} & \frac{\Gamma(\alpha+\tau)}{\Gamma(\alpha)\Gamma(\tau)}\frac{\theta^\alpha x^{\tau-1}}{(x+\theta)^{\alpha+\tau}} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & \beta(\tau,\alpha;u) \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\theta^k\Gamma(\tau+1)\Gamma(\alpha-k)}{\Gamma(\alpha)\Gamma(\tau)} \\
~~~~\mathrm{E}[X^k] & -\tau<k<\alpha \\
\hline
\mathrm{E}[(X\wedge x)^k] & \frac{\theta^k\Gamma(\tau+k)\Gamma(\alpha-k)}{\Gamma(\alpha)\Gamma(\tau)}\beta(\tau+k,\alpha-k;u)+x^k[1-\beta(\tau,\alpha;u)] \\
& k>-\tau \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dgenpareto}(x=, shape1=\alpha, shape2=\tau, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pgenpareto}(q=, shape1=\alpha, shape2=\tau, scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qgenpareto}(p=, shape1=\alpha, shape2=\tau, scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rgenpareto}(r=, shape1=\alpha, shape2=\tau, scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Burr
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0, \alpha>0, \gamma>0, u=\frac{1}{1+(x/\theta)^\gamma} \\
\hline
\small{\text{Función densidad}} & \frac{\alpha\gamma(x/\theta)^\gamma}{x[1+(x/\theta)^\gamma]^{\alpha+1}} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & 1-u^\alpha \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\theta^k\Gamma(1+(k/\gamma))\Gamma(\alpha-(k/\gamma))}{\Gamma(\alpha)} \\
~~~~\mathrm{E}[X^k] & -\gamma<k<\alpha\gamma \\
\hline
\mathrm{E}[(X\wedge x)^k] & \frac{\theta^k\Gamma(1+(k/\gamma))\Gamma(\alpha-(k/\gamma))}{\Gamma(\alpha)}\beta(1+(k/\gamma),\alpha-(k/\gamma);1-u)+x^ku^\alpha \\
& k>-\gamma \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dburr}(x=, shape1=\alpha, shape2=\gamma, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pburr}(p=, shape1=\alpha, shape2=\gamma, scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qburr}(q=, shape1=\alpha, shape2=\gamma, scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rburr}(n=, shape1=\alpha, shape2=\gamma, scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
Inversa Burr
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0, \tau>0, \gamma>0, u=\frac{(x/\theta)^\gamma}{1+(x/\theta)^\gamma} \\
\hline
\small{\text{Función densidad}} & \frac{\tau\gamma(x/\theta)^{\tau \gamma}}{x[1+(x/\theta)^\gamma]^{\tau+1}} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & u^\tau \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\theta^k\Gamma(\tau+(k/\gamma))\Gamma(1-(k/\gamma))}{\Gamma(\tau)} \\
~~~~\mathrm{E}[X^k] & -\tau\gamma<k<\gamma \\
\hline
\mathrm{E}[(X\wedge x)^k] & \frac{\theta^k\Gamma(\tau+(k/\gamma))\Gamma(1-(k/\gamma))}{\Gamma(\tau)}\beta(\tau+(k/\gamma),1-(k/\gamma);u)+x^k[1-u^\tau] \\
& k>-\tau\gamma \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dinvburr}(x=, shape1=\tau, shape2=\gamma, scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pinvburr}(p=, shape1=\tau, shape2=\gamma, scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qinvburr}(q=, shape1=\tau, shape2=\gamma, scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rinvburr}(n=, shape1=\tau, shape2=\gamma, scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
18.2.4 Distribución Cuatro Parámetros
Generalizada Beta de Segundo Tipo (GB2)
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0, \alpha_1>0, \alpha_2>0, \sigma>0 \\
\hline
\small{\text{Función densidad}} & \frac{(x/\theta)^{\alpha_2/\sigma}}{x \sigma~\mathrm{B}\left( \alpha_1,\alpha_2\right)\left\lbrack 1 + \left( x/\theta \right)^{1/\sigma} \right\rbrack^{\alpha_1 + \alpha_2}} \\
~~ \small{\text{probabilidad }} f(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\theta^{k}~\mathrm{B}\left( \alpha_1 +k \sigma,\alpha_2 - k \sigma \right)}{\mathrm{B}\left( \alpha_1,\alpha_2 \right)} \\
~~~~\mathrm{E}[X^k] & \textit{k}>0 \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
Consulte el sitio R Codes for Loss Data Analytics para obtener información sobre esta distribución.
18.2.5 Otras Distribuciones
Lognormal
Funciones \[ \begin{matrix} \begin{array}{l|c} \hline \text{Nombre} & \text{Función} \\ \hline \small{\text{Hipótesis parámetros}} & -\infty <\mu <\infty, \sigma>0 \\ \hline \small{\text{Función densidad}} & \frac{1}{x\sqrt{2\pi}\sigma} \exp\left( -\frac{(\ln x-\mu)^2}{2\sigma^2}\right) \\ ~~ \small{\text{probabilidad }} f(x)& \\ \hline \small{\text{Función distribución}} & \Phi\left(\frac{\ln (x)-\mu}{\sigma}\right) \\ ~~F(x) & \\ \hline \textit{k}^{th}~\small{\text{momento}} & \exp(k\mu+\frac{k^2\sigma^2}{2}) \\ ~~\mathrm{E}[X^k] & \\ \hline \small{\text{Valor Esperado Limitado}} & \exp\Big(k\mu+\frac{k^2\sigma^2}{2}\Big)\Phi\Big(\frac{\ln (x)-\mu-k\sigma^2}{\sigma}\Big)+x^k\Big[1-\Phi\Big(\frac{\ln (x)-\mu}{\sigma}\Big)\Big] \\ ~~\mathrm{E}[X\wedge x] & \\ \hline \end{array} \end{matrix} \] Gráfico ilustrativo
Inversa Gaussiana
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0, \mu>0, z=\frac{x-\mu}{\mu}~,~y=\frac{x+\mu}{\mu} \\
\hline
\small{\text{Función densidad}} & \Big(\frac{\theta}{2\pi x^3}\Big)^{1/2}\exp\Big(\frac{-\theta z^2}{2x}\Big) \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & \Phi\Big[z\Big(\frac{\theta}{x}\Big)^{1/2}\Big]+\exp\Big(\frac{2\theta}{\mu}\Big)\Phi\Big[-y\Big(\frac{\theta}{x}\Big)^{1/2}\Big] \\
~~F(x) & \\
\hline
\text{Mean} & \mu \\
\mathrm{E}[X] & \\
\hline
\mathrm{Var[X]} & \frac{\mu^3}{\theta}\\
\hline
\mathrm{E}[(X\wedge x)^k] & x-\mu x\Phi\Big[z\Big(\frac{\theta}{x}\Big)^{1/2}\Big]-(\mu y)\exp\Big(\frac{2\theta}{\mu}\Big)\Phi\Big[-y\Big(\frac{\theta}{x}\Big)^{1/2}\Big] \\
& \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dinvgauss}(x=, mean=\mu,dispersion=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pinvgauss}(p=, mean=\mu,dispersion=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qinvgauss}(q=, mean=\mu,dispersion=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rinvgauss}(n=, mean=\mu,dispersion=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
18.2.6 Distribuciones con Soporte Finito
Beta
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0, ~a>0,~b>0, u=\frac{x}{\theta},~0<x<\theta \\
\hline
\small{\text{Función densidad}} & \frac{\Gamma(a+b)}{\Gamma(a)\Gamma(b)} u^a(1-u)^{b-1}\frac{1}{x} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & \beta(a,b;u) \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\theta^k
\Gamma(a+b)\Gamma(a+k)}{\Gamma(a)\Gamma(a+b+k)} \\
~~\mathrm{E}[X^k] & k>-a \\
\hline
& \frac{\theta^k a(a+1)\cdots(a+k-1)}{(a+b)(a+b+1)\cdots(a+b+k-1)}\beta(a+k,b;u)+x^k[1-\beta(a,b;u)] \\
~~\mathrm{E}[X\wedge x]^k & \\
\hline
\end{array}
\end{matrix}
\]
R
Comandos
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dbeta}(x=, shape1=a,shape2=b,ncp=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pbeta}(p=, shape1=a,shape2=b,ncp=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qbeta}(q=, shape1=a,shape2=b,ncp=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rbeta}(n=, shape1=a,shape2=b,ncp=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Generalizada Beta
Funciones
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre} & \text{Función} \\
\hline
\small{\text{Hipótesis parámetros}} & \theta>0, a>0, b>0, \tau>0, 0<x<\theta~,~u=(x/\theta)^\tau \\
\hline
\small{\text{Función densidad}} & \frac{\Gamma(a+b)}{\Gamma(a)\Gamma(b)}u^\alpha(1-u)^{b-1}\frac{\tau}{x} \\
~~ \small{\text{probabilidad }} f(x)& \\
\hline
\small{\text{Función distribución}} & \beta(a,b;u) \\
~~F(x) & \\
\hline
\textit{k}^{th}~\small{\text{momento}} & \frac{\theta^k\Gamma(a+b)\Gamma(a+(k/\tau))}{\Gamma(a)\Gamma(a+b+(k/\tau))} \\
~~\mathrm{E}[X^k] & k>-\alpha\tau \\
\hline
\mathrm{E}[(X\wedge x)^k] & \frac{\theta^k\Gamma(a+b)\Gamma(a+(k/\tau))}{\Gamma(a)\Gamma(a+b+(k/\tau))}\beta(a+(k/\tau),b;u)+x^k[1-\beta(a,b;u)] \\
\hline
\end{array}
\end{matrix}
\]
R
Commmands
\[
\begin{matrix}
\begin{array}{l|c}
\hline
\text{Nombre función} & \text{R Comando} \\
\hline
\small{\text{Función densidad}} & \text{dgenbeta}(x=, shape1=a,shape2=b,shape3=\tau,scale=\theta) \\
\hline
\small{\text{Función distribución}} & \text{pgenbeta}(p=, shape1=a,shape2=b,shape3=\tau,scale=\theta) \\
\hline
\small{\text{Función cuantila}} & \text{qgenbeta}(q=, shape1=a,shape2=b,shape3=\tau,scale=\theta) \\
\hline
\small{\text{Función muestreo aleatorio}} & \text{rgenbeta}(n=, shape1=a,shape2=b,shape3=\tau,scale=\theta) \\
\hline
\end{array}
\end{matrix}
\]
Gráfico ilustrativo
18.3 Valor Esperado Limitado
Resumen. Esta sección resume el valor esperado limitado para determinadas distribuciones continuas.
Funciones
Valor Esperado Limitado Funciones
\[ \begin{matrix} \begin{array}{l|c} \hline \text{Distribución} & \text{Función} \\ \hline \text{GB2} & \frac{\theta\Gamma(\tau+1)\Gamma(\alpha-1)}{\Gamma(\alpha)\Gamma(\tau)}\beta(\tau+1,\alpha-1;\frac{x}{x+\beta})+x[1-\beta(\tau,\alpha;\frac{x}{x+\beta})] \\ \hline \text{Burr} & \frac{\theta\Gamma(1+\frac{1}{\gamma})\Gamma(\alpha-\frac{1}{\gamma})}{\Gamma(\alpha)}\beta(1+\frac{1}{\gamma},\alpha-\frac{1}{\gamma};1-\frac{1}{1+(x/\theta)^\gamma})+x\Big(\frac{1}{1+(x/\theta)^\gamma}\Big)^\alpha \\ \hline \text{Inversa Burr} & \frac{\theta\Gamma(\tau+(1/\gamma))\Gamma(1-(1/\gamma))}{\Gamma(\tau)}\beta(\tau+\frac{1}{\gamma},1-\frac{1}{\gamma};\frac{(x/\theta)^\gamma}{1+(x/\theta)^\gamma})+x[1-\Big(\frac{(x/\theta)^\gamma}{1+(x/\theta)^\gamma}\Big)^\tau] \\ \hline \text{Pareto} & \\ \alpha=1 & -\theta \ln \Big(\frac{\theta}{x+\theta}\Big) \\ \alpha\neq1 & \frac{\theta}{\alpha-1}[1-\Big(\frac{\theta}{x+\theta}\Big)^{\alpha-1}] \\ \hline \text{Inversa Pareto} & \theta\tau\int^{x/(x+\theta)}_0~y^\tau(1-y)^{-1}dy+x[1-\Big(\frac{x}{x+\theta}\Big)^\tau] \\ \hline \text{Loglogistic} & \theta\Gamma(1+\frac{1}{\gamma})\Gamma(1-\frac{1}{\gamma})\beta(1+\frac{1}{\gamma},1-\frac{1}{\gamma};\frac{(x/\theta)^\gamma}{1+(x/\theta)^\gamma})+x(1-\frac{(x/\theta)^\gamma}{1+(x/\theta)^\gamma}) \\ \hline \text{Paralogistic} & \frac{\theta\Gamma(1+\frac{1}{\alpha})\Gamma(\alpha-\frac{1}{\alpha})}{\Gamma(\alpha)}\beta(1+\frac{1}{\alpha},\alpha-\frac{1}{\alpha};1-\frac{1}{1+(x/\theta)^\alpha})+x\Big(\frac{1}{1+(x/\theta)^\alpha}\Big)^\alpha \\ \hline \text{Inversa Paralogistic} & \frac{\theta\Gamma(\tau+\frac{1}{\tau})\Gamma(1-\frac{1}{\tau})}{\Gamma(\tau)}\beta(\tau+\frac{1}{\tau},1-\frac{1}{\tau};\frac{(x/\theta)^\tau}{1+(x/\theta)^\tau})+x[1-\Big(\frac{(x/\theta)^\tau}{1+(x/\theta)^\tau}\Big)^\tau] \\ \hline \text{Gamma} & \frac{\theta\Gamma(\alpha+1)}{\Gamma(\alpha)}\Gamma(\alpha+1;\frac{x}{\theta})+x[1-\Gamma(\alpha;\frac{x}{\theta})] \\ \hline \text{Inversa Gamma} & \frac{\theta\Gamma(\alpha-1)}{\Gamma(\alpha)}[1-\Gamma(\alpha-1;\frac{\theta}{x})]+x\Gamma(\alpha;\frac{\theta}{x}) \\ \hline \text{Weibull} & \theta\Gamma(1+\frac{1}{\alpha})\Gamma(1+\frac{1}{\alpha};\Big(\frac{x}{\theta}\Big)^\alpha)+x*\exp(-(x/\theta)^\alpha) \\ \hline \text{Inversa Weibull} & \theta\Gamma(1-\frac{1}{\alpha})[1-\Gamma(1-\frac{1}{\alpha};\Big(\frac{\theta}{x}\Big)^\alpha)]+x[1-\exp(-(\theta/x)^\alpha)] \\ \hline \text{Exponencial} & \theta(1-\exp(-(x/\theta))) \\ \hline \text{Inversa Exponencial} & \theta G(0;\frac{\theta}{x})+x(1-\exp(-(\theta/x))) \\ \hline \text{Lognormal} & \exp(\mu+\sigma^2/2)\Phi\Big(\frac{\ln (x)-\mu-\sigma^2}{\sigma}\Big)+x[1-\Phi\Big(\frac{\ln (x)-\mu}{\sigma}\Big)] \\ \hline \text{Inversa Gaussiana} & x-\mu\Big(\frac{x-\mu}{\mu}\Big)\Phi\Big[\Big(\frac{x-\mu}{\mu}\Big)\Big(\frac{\theta}{x}\Big)^{1/2}\Big]-\mu\Big(\frac{x+\mu}{\mu}\Big)\exp\Big(\frac{2\theta}{\mu}\Big)\Phi\Big[-\Big(\frac{x+\mu}{\mu}\Big)\Big(\frac{\theta}{x}\Big)^{1/2}\Big] \\ \hline \text{Un-Parámetri Pareto} & \frac{\alpha\theta}{\alpha-1}-\frac{\theta^\alpha}{(\alpha-1)x^{\alpha-1}} \\ \hline \text{Generalizada Beta} & \frac{\theta\Gamma(a+b)\Gamma(a+\frac{1}{\tau})}{\Gamma(a)\Gamma(a+b+\frac{1}{\tau})}\beta(a+\frac{1}{\tau},b;\Big(\frac{x}{\theta}\Big)^\tau)+x\Big[1-\beta(a,b;\Big(\frac{x}{\theta}\Big)^\tau)\Big] \\ \hline \text{Beta} & \frac{\theta a}{(a+b)}\beta(a+1,b;\frac{x}{\theta})+x[1-\beta(a,b;\frac{x}{\theta})] \\ \hline \end{array} \end{matrix} \]
Gráfico ilustrativo
Comparación del valor esperado limitado para una selección de distribuciones
\[ \begin{matrix} \begin{array}{l|c|c|c|c|c|c} \hline \text{Distribution} & \text{Parameters} & \mathrm{E}[x] & E[X\wedge100] & E[X\wedge250] & E[X\wedge500] &E[X\wedge1000] \\ \hline \text{Pareto} & \alpha = 3, \theta = 200 & 100 & 55,55 &80,25 & 91,84 & 97,22 \\ \hline \text{Exponencial} & \theta = 100 & 100 & 63,21 & 91,79 & 99,33 & 99,99 \\ \hline \text{Gamma} & \alpha = 2, \theta = 50 & 100 & 72,93 & 97,64 & 99,97 & 100 \\ \hline \text{Weibull} & \tau=2, \theta=\frac{200}{\sqrt[]{\pi}} & 100 & 78,99 & 99,82 & 100 & 100 \\ \hline \text{GB2} & \alpha = 3,\tau=2,\theta = 100 & 100 & 62,50 & 86,00 & 94,91 & 98,42 \\ \hline \end{array} \end{matrix} \]