Description Usage Arguments Value Examples
constrain a model of class pPCA
1 2 3 4 5 6 7 8 9 10 11 12 13 | statismoConstrainModel(model, sample, pt, ptValueNoise)
## S4 method for signature 'pPCA,matrix,matrix'
statismoConstrainModel(model, sample, pt,
ptValueNoise)
## S4 method for signature 'pPCA,matrix,numeric'
statismoConstrainModel(model, sample, pt,
ptValueNoise)
## S4 method for signature 'pPCA,numeric,numeric'
statismoConstrainModel(model, sample, pt,
ptValueNoise)
|
model |
object of class pPCA |
sample |
k x 3 matrix containing coordinates to constrain model to |
pt |
either a matrix with each row containing points on the model's domain corresponding to the row in |
ptValueNoise |
numeric: specify noise on constraints. |
a constrained model
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | require(Rvcg)
data(humface)
hummodel <- statismoModelFromRepresenter(humface)
GPmodConstUnif <- statismoConstrainModel(hummodel,humface.lm,humface.lm,ptValueNoise = 1)
## Not run:
## sample from model
for(i in 1:10) rgl::wire3d(DrawSample(GPmodConstUnif),col="red")
## End(Not run)
noise <- (0:6)*5
GPmodConst <- statismoConstrainModel(hummodel,humface.lm,humface.lm,ptValueNoise = noise)
## Not run:
## sample from model
for(i in 1:10) rgl::wire3d(DrawSample(GPmodConst),col="white")
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.