Generate the posterior function of the Dirichlet function

Generate the posterior function of the Dirichlet function

PosteriorFunction(dpobj, ind)

Arguments

dpobj	Fitted Dirichlet Process object
ind	What iteration to draw the posterior function from. Defaults to the last iteration.

Value

A posterior function f(x).

Examples

y <- rnorm(10)
dp <- DirichletProcessGaussian(y)
dp <- Fit(dp, 5)
postFuncDraw <- PosteriorFunction(dp)
plot(-3:3, postFuncDraw(-3:3))