rseg.tri {pcds} | R Documentation |
Generation of points segregated (in a Type I fashion) from the vertices of a triangle
Description
An object of class "Patterns"
.
Generates n
points uniformly in the support
for Type I segregation in a given triangle, tri
.
delta
is the parameter of segregation (that is,
\delta 100
% of the area around each vertex
in the triangle is forbidden for point generation).
delta
corresponds to eps
in the
standard equilateral triangle T_e
as delta=4 eps^2/3
(see rseg.std.tri
function).
See (Ceyhan et al. (2006); Ceyhan et al. (2007); Ceyhan (2011)) for more on the segregation pattern.
Usage
rseg.tri(n, tri, delta)
Arguments
n |
A positive integer representing the number of points
to be generated from the segregation pattern
in the triangle, |
tri |
A |
delta |
A positive real number in |
Value
A list
with the elements
type |
The type of the pattern from which points are to be generated |
mtitle |
The |
parameters |
Exclusion parameter, |
ref.points |
The input set of points, i.e., vertices of |
gen.points |
The output set of generated points segregated
from the vertices of |
tri.Y |
Logical output,
if |
desc.pat |
Description of the point pattern |
num.points |
The |
xlimit , ylimit |
The ranges of the |
Author(s)
Elvan Ceyhan
References
Ceyhan E (2011).
“Spatial Clustering Tests Based on Domination Number of a New Random Digraph Family.”
Communications in Statistics - Theory and Methods, 40(8), 1363-1395.
Ceyhan E, Priebe CE, Marchette DJ (2007).
“A new family of random graphs for testing spatial segregation.”
Canadian Journal of Statistics, 35(1), 27-50.
Ceyhan E, Priebe CE, Wierman JC (2006).
“Relative density of the random r
-factor proximity catch digraphs for testing spatial patterns of segregation and association.”
Computational Statistics & Data Analysis, 50(8), 1925-1964.
See Also
rassoc.tri
, rseg.std.tri
,
rsegII.std.tri
, and rseg.multi.tri
Examples
n<-100
A<-c(1,1); B<-c(2,0); C<-c(1.5,2);
Tr<-rbind(A,B,C)
del<-.4
Xdt<-rseg.tri(n,Tr,del)
Xdt
summary(Xdt)
plot(Xdt)
Xp<-Xdt$g
Xlim<-range(Tr[,1])
Ylim<-range(Tr[,2])
xd<-Xlim[2]-Xlim[1]
yd<-Ylim[2]-Ylim[1]
plot(Tr,pch=".",xlab="",ylab="",
main="Points from Type I Segregation \n in one Triangle",
xlim=Xlim+xd*c(-.05,.05),ylim=Ylim+yd*c(-.05,.05))
polygon(Tr)
points(Xp)
xc<-Tr[,1]+c(-.02,.02,.02)
yc<-Tr[,2]+c(.02,.02,.03)
txt.str<-c("A","B","C")
text(xc,yc,txt.str)