Returns a function that evaluates the mixture density at given points. The mixture density is \(f(x) = \sum_k w_k f_k(x)\).

# S3 method for class 'mixture'
density(x, ...)

Arguments

x

A mixture object.

...

Additional arguments (not used).

Value

A function function(t, log = FALSE, ...) returning the density (or log-density) at t.

Examples

m <- mixture(list(normal(0, 1), normal(5, 1)), c(0.5, 0.5))
f <- density(m)
f(0)
#> [1] 0.1994719
f(2.5)
#> [1] 0.0175283