morphomapTranslate {morphomap}

morphomapTranslate

Description

Translate a section to a new center defined by the user

Usage

morphomapTranslate(corA, medA, Cx, Cy)

Arguments

corA

matrix: coordinates of the external outline

medA

matrix: coordinates of the internal outline

Cx

numeric: new x center coordinate

Cy

numeric: new y center coordinate

Value

cortical new centered coordinates of the external outline

medullar new centered coordinates of the internal outline

Author(s)

Antonio Profico, Luca Bondioli, Pasquale Raia, Paul O'Higgins, Damiano Marchi

Examples

extsec<-morphomapCircle(10,1000)
intsec<-morphomapCircle(8,1000)
plot(extsec,asp=1,type="l",xlim=c(-11,11),ylim=c(-11,11))
points(intsec,type="l")
traSect<-morphomapTranslate(extsec,intsec,1,1)
points(traSect$cortical,type="l",col="red")
points(traSect$medullar,type="l",col="red")