CRV.computeInitMom: CRV.computeInitMom

In AlecuMihai/ContinuousRV: Create and Manipulate Continue Random Variables

Description

Determina momentele initiale pana la ordinul 4 pentru o v.a. continua construita utilizand ContinuousRV::CRV.

Usage

CRV.computeInitMom(obj)

Arguments

obj	v.a. continua construita utilizand ContinuousRV::CRV.

Details

fun <- obj@fun
for(i in 0 : 4) {
f <- function(x) {
x**i
}
integrand <- function(x) {
fun(x) * f(x)
}
out <- integrate(integrand, lower = obj@lo, upper = obj@hi)$value
result <- append(result, out)
}

Examples

X <- CRV(fun = function(x){(2197/5412) * (x**2 + 3*x + 1)}, lo = 0, hi = 12/13)
moments <- CRV.computeInitMom(X)

library(MASS)
fractions(moments)

AlecuMihai/ContinuousRV documentation built on Dec. 17, 2021, 7:48 a.m.