Plots the points in and outside of the Delaunay triangles based on Yp
points which partition
the convex hull of Yp
points and also plots the PE proximity regions
for Xp
points and the Delaunay triangles based on Yp
points.
PE proximity regions are constructed with respect to the Delaunay triangles with the expansion parameter
Vertex regions in each triangle is based on the center
See (ceyhan:Phd-thesis,ceyhan:arc-density-PE,ceyhan:dom-num-NPE-Spat2011;textualpcds) for more on the PE proximity regions. Also see (okabe:2000,ceyhan:comp-geo-2010,sinclair:2016;textualpcds) for more on Delaunay triangulation and the corresponding algorithm.
plotPEregsMT(
Xp,
Yp,
r,
M = c(1, 1, 1),
asp = NA,
main = "",
xlab = "",
ylab = "",
xlim = NULL,
ylim = NULL,
...
)
A set of 2D points for which PE proximity regions are constructed.
A set of 2D points which constitute the vertices of the Delaunay triangles.
A positive real number which serves as the expansion parameter in PE proximity region;
must be
A 2D point in Cartesian coordinates or a 3D point in barycentric coordinates
which serves as a center in the interior of the triangle tri
or the circumcenter of tri
.
A numeric
value, giving the aspect ratio NA
),
see the official help page for asp
by typing "? asp
".
An overall title for the plot (default=""
).
Titles for the ""
for both)
Two numeric
vectors of length 2, giving the NULL
for both).
Additional plot
parameters.
Plot of the Xp
points, Delaunay triangles based on Yp
points and also the PE proximity regions
for Xp
points inside the convex hull of Yp
points
# NOT RUN {
#nx is number of X points (target) and ny is number of Y points (nontarget)
nx<-20; ny<-4; #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,1),runif(ny,0,1))
Xlim<-range(Xp[,1],Yp[,1])
Ylim<-range(Xp[,2],Yp[,2])
xd<-Xlim[2]-Xlim[1]
yd<-Ylim[2]-Ylim[1]
M<-c(1,1,1) #try also M<-c(1,2,3)
r<-1.5 #try also r<-2
plotPEregsMT(Xp,Yp,r,M,xlab="",ylab="",xlim=Xlim+xd*c(-.05,.05),ylim=Ylim+yd*c(-.05,.05))
plotPEregsMT(Xp,Yp[1:3,],r,M,xlab="",ylab="",xlim=Xlim+xd*c(-.05,.05),ylim=Ylim+yd*c(-.05,.05))
# }
Run the code above in your browser using DataLab