# NOT RUN {
# Quantile-based asymmetric exponential power distribution
# Density
rnum<-rnorm(100)
dAEPD(y=rnum,mu=0,phi=1,alpha=.5,p=2)
# Distribution function
pAEPD(q=rnum,mu=0,phi=1,alpha=.5,p=2)
# Quantile function
beta<-c(0.25,0.5,0.75)
qAEPD(beta=beta,mu=0,phi=1,alpha=.5,p=2)
# random sample generation
rAEPD(n=100,mu=0,phi=1,alpha=.5,p=2)
# }
Run the code above in your browser using DataLab