inst/examples/getFeatureImageExample.R

x <- loadPhoto()
z <- makeZimage(ncol(x), lensPolyCoef(c(0.9192, -0.1792, -0.000443)))
r <- makeRings(z, angleWidth = asAngle(30))
fi <- getFeatureImage(raster::subset(x, 3), r, sd)
plot(fi)
GastonMauroDiaz/caiman documentation built on Jan. 22, 2022, 4:43 a.m.