View source: R/ArcSliceFunctions.R
plotASarcs | R Documentation |
Plots the arcs of AS-PCD whose vertices are the data points in Xp
and Delaunay triangles based on Yp
points.
AS proximity regions are constructed with respect to the Delaunay triangles based on Yp
points, i.e.,
AS proximity regions are defined only for Xp
points inside the convex hull of Yp
points.
That is, arcs may exist for Xp
points only inside the convex hull of Yp
points.
Vertex regions are based on the center M="CC"
for circumcenter of each Delaunay triangle or M=(\alpha,\beta,\gamma)
in barycentric coordinates in the
interior of each Delaunay triangle; default is M="CC"
i.e., circumcenter of each triangle.
See (\insertCiteceyhan:Phd-thesis,ceyhan:comp-geo-2010,ceyhan:mcap2012;textualpcds) for more on AS-PCDs. Also see (\insertCiteokabe:2000,ceyhan:comp-geo-2010,sinclair:2016;textualpcds) for more on Delaunay triangulation and the corresponding algorithm.
plotASarcs(
Xp,
Yp,
M = "CC",
asp = NA,
main = NULL,
xlab = NULL,
ylab = NULL,
xlim = NULL,
ylim = NULL,
...
)
Xp |
A set of 2D points which constitute the vertices of the AS-PCD. |
Yp |
A set of 2D points which constitute the vertices of the Delaunay triangulation. The Delaunay
triangles partition the convex hull of |
M |
The center of the triangle. |
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 AS-PCD for a 2D data set Xp
where AS proximity regions
are defined with respect to the Delaunay triangles based on Yp
points; also plots the Delaunay triangles
based on Yp
points.
Elvan Ceyhan
plotASarcs.tri
, plotPEarcs.tri
, plotPEarcs
,
plotCSarcs.tri
, and plotCSarcs
## Not run:
#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)
#plotASarcs(Xp,Yp,M,xlab="",ylab="")
plotASarcs(Xp,Yp,M,asp=1,xlab="",ylab="")
plotASarcs(Xp,Yp[1:3,],M,xlab="",ylab="")
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.