statismoConstrainModel: constrain a model of class pPCA

Description Usage Arguments Value Examples

Description

constrain a model of class pPCA

Usage

 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)

Arguments

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 sample or an integer vector specifying the coordinates of the sample's mean corresponding to sample

ptValueNoise

numeric: specify noise on constraints.

Value

a constrained model

Examples

 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)

zarquon42b/RvtkStatismo documentation built on May 4, 2019, 9:09 p.m.