plotPEarcs.int {pcds} | R Documentation |
The plot of the arcs of Proportional Edge Proximity Catch Digraphs
(PE-PCDs) for 1D data
(vertices jittered along y
-coordinate) - one interval case
Description
Plots the arcs of PE-PCD whose vertices are the 1D points, Xp
.
PE proximity regions are constructed with
expansion parameter r \ge 1
and centrality parameter c \in (0,1)
and the intervals are based on the interval int
=(a,b)
That is, data set Xp
constitutes the vertices of the digraph
and int
determines the end points of the interval.
If there are duplicates of Xp
points,
only one point is retained for each duplicate value,
and a warning message is printed.
For better visualization, a uniform jitter from U(-Jit,Jit)
(default for Jit=.1
) is added to
the y
-direction where Jit
equals to
the range of \{
Xp
, int
\}
multiplied by Jit
with default for Jit=.1
).
center
is a logical argument, if TRUE
,
plot includes the center of the interval int
as a vertical line in the plot,
else center of the interval is not plotted.
See also (Ceyhan (2012)).
Usage
plotPEarcs.int(
Xp,
int,
r,
c = 0.5,
Jit = 0.1,
main = NULL,
xlab = NULL,
ylab = NULL,
xlim = NULL,
ylim = NULL,
center = FALSE,
...
)
Arguments
Xp |
A |
int |
A |
r |
A positive real number which serves as the expansion parameter in PE proximity region;
must be |
c |
A positive real number in |
Jit |
A positive real number that determines the amount of jitter along the |
main |
An overall title for the plot (default= |
xlab , ylab |
Titles of the |
xlim , ylim |
Two |
center |
A logical argument, if |
... |
Additional |
Value
A plot of the arcs of PE-PCD whose vertices are the 1D data set Xp
in which vertices are jittered
along y
-axis for better visualization.
Author(s)
Elvan Ceyhan
References
Ceyhan E (2012). “The Distribution of the Relative Arc Density of a Family of Interval Catch Digraph Based on Uniform Data.” Metrika, 75(6), 761-793.
See Also
plotPEarcs1D
and plotCSarcs.int
Examples
r<-2
c<-.4
a<-0; b<-10; int<-c(a,b)
#n is number of X points
n<-10; #try also n<-20;
set.seed(1)
xf<-(int[2]-int[1])*.1
Xp<-runif(n,a-xf,b+xf)
Xlim=range(Xp,int)
Ylim=.1*c(-1,1)
jit<-.1
set.seed(1)
plotPEarcs.int(Xp,int,r=1.5,c=.3,jit,xlab="",ylab="",center=TRUE)
set.seed(1)
plotPEarcs.int(Xp,int,r=2,c=.3,jit,xlab="",ylab="",center=TRUE)