R/bernstein2.r

In penRvine: Flexible R-Vines Estimation Using Bivariate Penalized Splines

Defines functions bernstein2

Documented in bernstein2

bernstein2 <- function(x,v,n)
{
    return((choose(n, v) * x^v * (1 - x)^(n - v)) * (n + 1))
}

Try the penRvine package in your browser