pcds (version 0.1.6)

funsMuVarCSend.int: Returns the mean and (asymptotic) variance of arc density of Central Similarity Proximity Catch Digraph (CS-PCD) for 1D data - end interval case

Description

Two functions: muCSend.int and asyvarCSend.int.

muCSend.int returns the mean of the arc density of CS-PCD and asyvarCSend.int returns the asymptotic variance of the arc density of CS-PCD for a given expansion parameter \(t>0\) for 1D uniform data in the left and right end intervals for the interval \((a,b)\).

See also (ceyhan:revstat-2016;textualpcds).

Usage

muCSend.int(t)
asyvarCSend.int(t)

Value

muCSend.int returns the mean and asyvarCSend.int returns the asymptotic variance of the arc density of CS-PCD for uniform data in end intervals

Arguments

t

A positive real number which serves as the expansion parameter in CS proximity region.

Author

Elvan Ceyhan

Details

funsMuVarCSend.int

References

See Also

muPEend.int and asyvarPEend.int

Examples

if (FALSE) {
#Examples for muCSend.int
muCSend.int(1.2)

tseq<-seq(0.01,5,by=.1)
ltseq<-length(tseq)

mu.end<-vector()
for (i in 1:ltseq)
{
  mu.end<-c(mu.end,muCSend.int(tseq[i]))
}

par(mar = c(5,4,4,2) + 0.1)
plot(tseq, mu.end,type="l",
ylab=expression(paste(mu,"(t)")),xlab="t",lty=1,xlim=range(tseq),ylim=c(0,1))
}

if (FALSE) {
#Examples for asyvarCSend.int
asyvarCSend.int(1.2)

tseq<-seq(.01,5,by=.1)
ltseq<-length(tseq)

var.end<-vector()
for (i in 1:ltseq)
{
  var.end<-c(var.end,asyvarCSend.int(tseq[i]))
}

par(mar=c(5,5,4,2))
plot(tseq, var.end,type="l",xlab="t",ylab=expression(paste(sigma^2,"(t)")),lty=1,xlim=range(tseq))
}