inst/examples/fisheye2pano_example.R

require(caiman)
hcp <- loadPhoto()
z <- makeZimage(ncol(hcp), lensPolyCoef(c(0.6427, 0.0346, -0.024491)))
a <- makeAimage(z)
m <- doMask(z, zlim = asAngle(c(10,80)))

plotRGB(fisheye2pano(hcp, z, a, m))
GastonMauroDiaz/caiman documentation built on Jan. 22, 2022, 4:43 a.m.