rjitter(X, radius, retry=TRUE, giveup = 10000)
"ppp"
).retry=FALSE
,
the point will be lost; if retry=TRUE
,
the algorithm will try again."ppp"
) in the same window
as X
.X
is subjected to
an independent random displacement. The displacement vectors are
uniformly distributed in a circle of radius radius
. If a displaced point lies outside the window, then if
retry=FALSE
the point will be lost.
However if retry=TRUE
, the algorithm will try again: each time a
perturbed point lies outside the window, the algorithm will reject it and
generate another proposed perturbation of the original point,
until one lies inside the window, or until giveup
unsuccessful
attempts have been made. In the latter case, any unresolved points
will be included without any perturbation. The return value will
always be a point pattern with the same number of points as X
.
X <- rsyst(owin(), 10, 10)
Y <- rjitter(X, 0.02)
plot(Y)
Run the code above in your browser using DataLab