code. compile. run. debug. share.
Source Code
Language
# LABORATORIO DIRIGIDO #2 - PREGUNTA 9
# Sea X una variable aleatoria continua, que tiene una
# función densidad f(x) = 3x^2, 0 < x < 1.
# Encuentra P(0.14 ≤ X ≤ 0.71). Calcule también E(X) y Var(X).
# Sugerencia: Usa el paquete distr y distrEx.
require(distr)
require(distrEx)
funcionDensidad <- function(x) {
ifelse(x>=0 & x<=1, 3*(x^2), 0)
}
distX <- UnivarLebDecDistribution( d = RtoDPQ(density_function, qbd) )
probabilidad <- P(distX, c(0.14, 0.71))
print(probabilidad)
esperanza <- E(distX)
print(esperanza)
varianza <- Var(distX)
print(varianza)
Compiling Program...
Standard Input:
Interactive Console
Text
Program is not being debugged. Click "Debug" button to start program in debug mode.
| # | Function | File:Line |
|---|
| Variable | Value |
|---|
| Register | Value |
|---|
| Expression | Value |
|---|
| # | Description |
|---|