\name{plotAllMix}
\alias{plotAllMix}
\title{Plots the Gaussian fitted  by \code{Mclust} on several numeric vectors}
\usage{
  plotAllMix(mc, A, nbMix = NULL, pdf, nbBreaks = 20,
    xlim = NULL)
}
\arguments{
  \item{mc}{A list consisting of outputs of function
  \code{Mclust} applied to each column of \code{A}, if this
  argument is missing \code{Mclust} is applied by the
  function.}

  \item{A}{A data.frame of dimensions 'samples x
  components'.}

  \item{nbMix}{The number of Gaussian to be fitted.}

  \item{nbBreaks}{The number of breaks for the histogram.}

  \item{xlim}{x-axis limits to be used in the plot.}

  \item{pdf}{A pdf file.}
}
\value{
  A list of \code{Mclust} results.
}
\description{
  Given a result of function \code{Mclust} applied on
  several numeric vectors, this function plots the fitted
  Gaussian on their histograms.
}
\details{
  This function can only deal with at the most three
  Gaussian
}
\examples{
A <-matrix(c(c(rnorm(80,mean=-0.5,sd=1),rnorm(80,mean=1,sd=0.2)),rnorm(160,mean=0.5,sd=1),
           c(rnorm(80,mean=-1,sd=0.3),rnorm(80,mean=0,sd=0.2))),ncol=3)
## apply function Mclust to each column of A
mc <- apply(A,2,Mclust)
## plot the corresponding Gaussians on the histogram of each column
plotAllMix(mc=mc,A=A)
## apply function Mclust to each column of A, and impose the fit of two Gaussian (G=2)
mc <- apply(A,2,Mclust,G=2)
## plot the corresponding Gaussians on the histogram of each column
plotAllMix(mc=mc,A=A)
## When arg 'mc' is missing, Mclust is applied by the function
plotAllMix(A=A)
}
\author{
  Anne Biton
}
\seealso{
  \code{\link{plotMix}}, \code{\link{hist}},
  \code{\link[mclust]{Mclust}}
}