[R-sig-Geo] KernelUD image scale bar
Mathieu Basille
basille.web at ase-research.org
Sat Sep 28 00:28:14 CEST 2013
Dear Lutfor,
Following the example of ?kernelUD:
## Load the package
library(adehabitatHR)
## Load the data
data(puechabonsp)
loc <- puechabonsp$relocs
## Estimation of UD for the four animals
(ud <- kernelUD(loc[,1]))
## The UD of the four animals
image(ud)
## First one with a scale
spplot(ud[[1]])
Then you'd be able to adjust it using spplot options (I'm not a specialist
of this, I just know it can be fairly complex). The reason it works is that
kernelUD produces an object of class estUDm, which is a list with one estUD
object per animal. An estUD object itself inherits from the class
SpatialPixelsDataFrame. As a result, every function that works on a spdf
would work on an estUD too.
Things will get a little bit trickier if you want all kernels on the same
scale. That's where you need to use the argument 'same4all = TRUE':
## Recompute the UD with the same grid for all animals
(ud2 <- kernelUD(loc[,1], same4all = TRUE))
## Convert it to a regular spdf
ud2 <- estUDm2spixdf(ud2)
## And plot
spplot(ud2)
Voilà !
Hope this helps,
Mathieu.
Le 09/27/2013 05:44 PM, Lutfor a écrit :
> Dear members,
>
> I have been trying to give scale bar on kernel contour map using
> adehabitatHR package. But I could not find any function to put scale bar
> onto the image produce.
>
> Any help would be much appreciated.
>
> Regards
> Lutfor
> UK
>
>
>
> --
> View this message in context: http://r-sig-geo.2731867.n2.nabble.com/KernelUD-image-scale-bar-tp7584738.html
> Sent from the R-sig-geo mailing list archive at Nabble.com.
>
> _______________________________________________
> R-sig-Geo mailing list
> R-sig-Geo at r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-sig-geo
>
--
~$ whoami
Mathieu Basille, PhD
~$ locate --details
University of Florida \\
Fort Lauderdale Research and Education Center
(+1) 954-577-6314
http://ase-research.org/basille
~$ fortune
« Le tout est de tout dire, et je manque de mots
Et je manque de temps, et je manque d'audace. »
-- Paul Éluard
More information about the R-sig-Geo
mailing list