NCStri {pcds} | R Documentation |
The vertices of the Central Similarity (CS) Proximity Region in a general triangle
Description
Returns the vertices of the CS proximity region (which is itself a triangle) for a point in the
triangle tri
(rv=1,rv=2,rv=3)
.
CS proximity region is defined with respect to the triangle tri
with expansion parameter and edge regions based on center
in Cartesian coordinates or
in barycentric coordinates in the interior of the triangle
tri
;
default is i.e., the center of mass of
tri
.
Edge regions are labeled as 1,2,3
rowwise for the corresponding vertices
of the triangle tri
. re
is the index of the edge region p
resides, with default=NULL
.
If p
is outside of tri
, it returns NULL
for the proximity region.
See also (Ceyhan (2005, 2010); Ceyhan et al. (2007)).
Usage
NCStri(p, tri, t, M = c(1, 1, 1), re = NULL)
Arguments
p |
A 2D point whose CS proximity region is to be computed. |
tri |
A |
t |
A positive real number which serves as the expansion parameter in CS proximity region. |
M |
A 2D point in Cartesian coordinates or a 3D point in barycentric coordinates
which serves as a center in the interior of the triangle |
re |
Index of the |
Value
Vertices of the triangular region which constitutes the CS proximity region with expansion parameter
and center
M
for a point p
Author(s)
Elvan Ceyhan
References
Ceyhan E (2005).
An Investigation of Proximity Catch Digraphs in Delaunay Tessellations, also available as technical monograph titled Proximity Catch Digraphs: Auxiliary Tools, Properties, and Applications.
Ph.D. thesis, The Johns Hopkins University, Baltimore, MD, 21218.
Ceyhan E (2010).
“Extension of One-Dimensional Proximity Regions to Higher Dimensions.”
Computational Geometry: Theory and Applications, 43(9), 721-748.
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.
See Also
Examples
A<-c(1,1); B<-c(2,0); C<-c(1.5,2);
Tr<-rbind(A,B,C);
tau<-1.5
M<-as.numeric(runif.tri(1,Tr)$g) #try also M<-c(1.6,1.2)
n<-3
set.seed(1)
Xp<-runif.tri(n,Tr)$g
NCStri(Xp[1,],Tr,tau,M)
P1<-as.numeric(runif.tri(1,Tr)$g) #try also P1<-c(.4,.2)
NCStri(P1,Tr,tau,M)
#or try
re<-rel.edges.tri(P1,Tr,M)$re
NCStri(P1,Tr,tau,M,re)