plotCSarcs | R Documentation |
Plots the arcs of Central Similarity Proximity Catch Digraph (CS-PCD)
whose vertices are the data
points in Xp
in the multiple triangle case and the Delaunay triangles
based on Yp
points.
If there are duplicates of Xp
points,
only one point is retained for each duplicate value,
and a warning message is printed.
CS proximity regions are defined with respect to the Delaunay triangles
based on Yp
points with
expansion parameter t>0
and edge regions in each triangle are
based on the center M=(\alpha,\beta,\gamma)
in barycentric coordinates in the interior of each Delaunay triangle
(default for M=(1,1,1)
which is the center of mass of the triangle).
Convex hull of Yp
is partitioned by the Delaunay triangles based on Yp
points
(i.e., multiple triangles are the set of these Delaunay triangles whose union constitutes the
convex hull of Yp
points). Loops are not allowed so arcs are only possible
for points inside the convex hull of Yp
points.
See (\insertCiteceyhan:Phd-thesis,ceyhan:arc-density-CS,ceyhan:test2014;textualpcds) more on the CS-PCDs. Also see (\insertCiteokabe:2000,ceyhan:comp-geo-2010,sinclair:2016;textualpcds) for more on Delaunay triangulation and the corresponding algorithm.
plotCSarcs(
Xp,
Yp,
t,
M = c(1, 1, 1),
asp = NA,
main = NULL,
xlab = NULL,
ylab = NULL,
xlim = NULL,
ylim = NULL,
...
)
Xp |
A set of 2D points which constitute the vertices of the CS-PCD. |
Yp |
A set of 2D points which constitute the vertices of the Delaunay triangles. |
t |
A positive real number which serves as the expansion parameter in CS proximity region. |
M |
A 3D point in barycentric coordinates which serves as a center in the interior of each Delaunay
triangle, default for |
asp |
A |
main |
An overall title for the plot (default= |
xlab , ylab |
Titles for the |
xlim , ylim |
Two |
... |
Additional |
A plot of the arcs of the CS-PCD whose vertices are the points in data set Xp
and the Delaunay
triangles based on Yp
points
Elvan Ceyhan
plotCSarcs.tri
, plotASarcs
, and plotPEarcs
#nx is number of X points (target) and ny is number of Y points (nontarget)
nx<-15; ny<-5; #try also nx<-40; ny<-10 or nx<-1000; ny<-10;
set.seed(1)
Xp<-cbind(runif(nx,0,1),runif(nx,0,1))
Yp<-cbind(runif(ny,0,.25),runif(ny,0,.25))+cbind(c(0,0,0.5,1,1),c(0,1,.5,0,1))
#try also Yp<-cbind(runif(ny,0,1),runif(ny,0,1))
M<-c(1,1,1) #try also M<-c(1,2,3)
t<-1.5 #try also t<-2
plotCSarcs(Xp,Yp,t,M,xlab="",ylab="")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.