smoothout {shapeR} | R Documentation |
Contour smoothing
Description
Remove high frequency pixel noise around the otolith outline
Usage
smoothout(object, n)
Arguments
object |
A |
n |
The number of iterations. The default value is 100. |
Value
A shapeR
object with smoothed otolith outlines in the slot outline.list
Author(s)
Lisa Anne Libungan
References
Haines, A.J., Crampton, J.S. (2000). Improvements to the method of Fourier shape analysis as applied in morphometric studies. Palaeontology 43: 765-783.
Claude, J. (2008) Morphometrics with R. Springer. 316 p.
Examples
data(shape)
shape = smoothout(shape,n=100)
# Plot smoothed outline on top of original outline for comparison
outline.org=shape@outline.list.org[["IC"]][["403_2"]]
outline=shape@outline.list[["IC"]][["403_2"]]
plot(outline.org$X,outline.org$Y,type='l',xlab="",ylab="",lwd=2,axes=FALSE)
lines(outline$X,outline$Y,col="red",lwd=2)
legend("bottomleft",c('Original','Smoothed'),lty=1,col=c('black','red'),lwd=2)
[Package shapeR version 1.0-1 Index]