\name{add.parallel.coordinates}
\alias{add.parallel.coordinates}
%- Also NEED an `\alias' for EACH other topic documented here.
\title{Add a parallel coordinates line to an existing plot}
\description{
  This function will allow the user to add a parallel coordinates line
  to an existing plot.  The single line can be specified with a certain
  scale, color, line type, and line width as well as with other \code{line} options.
}
\note{This function is deprecated, please use \code{add.parallelCoordinates}.}
\usage{
add.parallel.coordinates(x, varlabpos = 1:length(x), scaled = FALSE, lty = 1, col = 1, lwd = 1, ...)
}
%- maybe also `usage' for other objects documented here.
\arguments{
  \item{x}{is a vector of variable values made for one cell/individual;
    the length corresponds to the number of variables on the horizontal
    x-axis}
  
  \item{varlabpos}{  a vector denoting the positions on the x-axis to
    plot values}
 
  \item{scaled}{Boolean; If TRUE, then the values of x will be on a
    (0,1) scale; if FALSE, then the original values of x are to be
    plotted on the vertical axis. }
  \item{lty}{numerical value denoting the line type; see \code{par}
    for descriptions }
  \item{col}{color of the line}
  \item{lwd}{line width}
  \item{\dots}{other options from the \code{lines} function}
}

\value{

  A parallel coordinates line will be added to the exisiting plot.
}

\author{A.J. Rossini, J.Y. Wan}


 \seealso{
   \code{\link{plot}},
   \code{\link{par}},
   \code{\link{lines}},
   \code{\link{parallelCoordinates}},
   \code{\link{ImageParCoord}}
 }

\examples{

if (require(rfcdmin)){

data.there<-is.element("MC.053",objects())
if ( ( sum(data.there) != length(data.there) )){
## obtaining the FCS objects from VRC data
data(MC.053min)
}


dataMC<-MC.053@data



if (interactive()){
par(mfrow=c(2,2))
### subset the data to the first 5 observations because it is too huge
parallelCoordinates(dataMC[c(1:5),-6])

## adding in the 6-th row observation
add.parallel.coordinates(dataMC[6,-6], col="red")

### the same plot is scaled to 0,1 range
parallelCoordinates(dataMC[c(1:5),-6], scaled=TRUE)
## adding in the 6-th row observation
add.parallel.coordinates(dataMC[6,-6], scaled=TRUE, col="red")

## positions on the horizontal x-axis
parallelCoordinates(dataMC[c(1:5),1:4], varlabpos=c(1, 5, 8, 16))
## adding in the 6-th row observation
add.parallel.coordinates(dataMC[6,1:4], varlabpos=c(1,5,8,16),
col="red")
}

}
}
\keyword{hplot}% at least one, from doc/KEYWORDS