# [R-sig-Geo] Function "simm.mou" in the package "adehabitatLT": how to modify distance between locations ?

Marine Regis marine.regis at hotmail.fr
Thu Oct 26 00:13:37 CEST 2017

```Marine Regis a partagé un fichier OneDrive avec vous. Pour l’afficher, cliquez sur le lien ci-dessous.

<https://1drv.ms/u/s!ArMv0o38inhEbHNJplyIZdV715Q>
[https://r1.res.office365.com/owa/prem/images/dc-generic_20.png]<https://1drv.ms/u/s!ArMv0o38inhEbHNJplyIZdV715Q>

Picture1.tif<https://1drv.ms/u/s!ArMv0o38inhEbHNJplyIZdV715Q>

Hello,

I would like to simulate a bivariate Ornstein-Uhlenbeck process in order to represent animal movement in a landscape raster.

To do this, I am testing the function “simm.mou” in the package “adehabitatLT”.

>From this function, how can I simulate a bivariate Ornstein-Uhlenbeck process that generates centroid points

with distance between two points equal to 1 or sqrt(2) within the raster extent ?

Here is the code that generates the raster (or landscape) and draws the start point (in red)

set.seed(1)

r <- squareRaster(extent(0, 10, 0, 10), cells=100)

res(r) <- 1

vals <- sample(1:10, 100, replace = TRUE)

r[] <- vals

plot(r)

points(5.5, 5.5, pch = 16, col = "red")

Here is the code that simulates a bivariate Ornstein-Uhlenbeck process using the function “simm.mou”

v <- simm.mou(1:50, x0=c(5.5, 5.5), b=c(3.5,3.5))

x0 contains the coordinates of the start point and b contains the coordinates of the attraction point.

I attached an image showing animal movement from the start point (5.5, 5.5) to the attraction point (3.5, 3.5). The attraction point is represented in blue.

Any help is welcome.