parampositions.Rd
\name{parampositions}
\alias{parampositions}
\title{Position of the parameters}
\description{
The function returns the internal positions of the model parameters
}
\usage{
parampositions(model, param, print=TRUE)
}
\arguments{
\item{print}{if \code{FALSE} only an invisible list is returned}
}
\value{
The model is printed and returned where the values of the parameters
are the positions in the internal representation.

An error appears if the model can be substantially simplified.
}
\author{Martin Schlather, \email{schlath@hsu-hh.de}
\url{http://www.unibw-hamburg.de/WWEB/math/schlath/schlather.html}}
\seealso{
}
\examples{
parampositions(model="exp", param=c(0,1,0,NA))
## that is, the nugget in the standard model is removed if naught!
## the values of the other parameters do not matter.

parampositions(model="exp", param=c(0,1,NA,NA))
parampositions(model="exp", param=c(0,0,1,NA))

parampositions(model="whi", param=cbind(c(1, 1, 1), c(2, 2, 2)))
parampositions(model="whi", param=cbind(c(1, 1, 1), c(2, 0, 2)))
## second lines, second column defines a nugget effect since scale is 0!

try(parampositions(model="whi", param=cbind(c(1, 1, 1), c(0, 0, 0))))

try(parampositions(model="whi",
param=cbind(c(1, 1, 1), c(2, 0, 0), c(1, 0, 0))))