Plot the initial density of a fit.

plot_init(x, colors = c(Tail = "gainsboro"))

Arguments

x

An object of class "dbpmm".

colors

If provided, these colours will be used for each cluster. If a subset of colours is provided, palette Set1 from RColorBrewer is used. By default the tail colour is provided as 'gainsboro'.

Value

A ggplot object for the plot.

Examples

data(fit_example) plot_init(fit_example$best)