| as.local.pimg {tripEstimation} | R Documentation |
~~ A concise (1-5 lines) description of what the function does. ~~
as.local.pimg(pimg)
pimg |
~~Describe pimg here~~ |
~~who you are~~
~put references to the literature/web site here ~
~~objects to See Also as help, ~~~
##---- Should be DIRECTLY executable !! ----
##-- ==> Define data, use random,
##-- or do help(data=index) for the standard data sets.
## The function is currently defined as
function(pimg) {
img <- coords.pimg(pimg)
img$x <- img$x[pimg$offset[1]:(pimg$offset[1] + nrow(pimg$image)-1)]
img$y <- img$y[pimg$offset[2]:(pimg$offset[2] + ncol(pimg$image)-1)]
img$z <- pimg$image
img
}