Mensaje de error

  • Deprecated function: The each() function is deprecated. This message will be suppressed on further calls en book_prev() (línea 775 de /home1/montes/public_html/drupal/modules/book/book.module).
  • Deprecated function: implode(): Passing glue string after array is deprecated. Swap the parameters en drupal_get_feeds() (línea 394 de /home1/montes/public_html/drupal/includes/common.inc).

2.Simulacion estadistica del Ejercicio 4.2 (Esperanza,varianza,momentos centrados y no centrados)

Solapas principales

[adsense:336x280:9156825571]
Instalaremos los paquetes (package) distr y distrEx de R-Project para poder hacer los calculos de Esperanza,varianza,momentos centrados y no centrados de la variable continua

Programa en R-Project:

> library(distr)

> library(distrEx)

> f<- function(x) exp(-x);

> #Definimos la distribucion continua X a partir de la funcion
 densidad
> X <- AbscontDistribution(d = f, low1 = 0)


> #Calculamos la esperanza de X

> E(X)
[1] 0.9999946

> #Calculamos la desviacion tipica de X

> sd(X)
[1] 0.9999768

> #Calculamos la esperanza E(Y), y=2x+1
 
> E(X,fun = function(x){2*x+1})
[1] 2.998038

> #Calculamos la desviacion tipica de Y

> sd(X,fun = function(x){2*x+1})
[1] 2.002391

> #Calculamos el momento no centrado de orden 2 de X


> E(X,fun = function(x){x^2})
[1] 1.999943

> #Calculamos el momento centrado de orden 2 de X

> E(X,fun = function(x){(x-E(X))^2})
[1] 0.9980022

> #Calculamos el momento centrado de orden 3 de X

> E(X,fun = function(x){(x-E(X))^3})
[1] 2.001181

 

Español
Pin It