# NOT RUN {
################################################
# The following examples provide the fitting
# results of the air quality data recorded in
# the city center of Leeds, UK, analysed in
# Beranger and Padoan (2015).
################################################
## Load datsets
data(pollution)
## Dataset PM10-NO-SO2 (PNS)
# }
# NOT RUN {
alik(PNS,model="Pairwise",c(1,1,1,1),trace=2,sig=2)
alik(PNS,model="Husler",rep(1,3),trace=2,sig=2)
alik(PNS,model="Dirichlet",rep(0.1,3),trace=2,sig=2)
alik(PNS,model="Extremalt",c(-0.5,-0.4,-0.5,1),c=0.01,trace=2,sig=2)
alik(PNS,model="Asymmetric",c(rep(1.1,4),rep(0.1,9)),c=0.01,trace=2,sig=2)
# }
# NOT RUN {
## Dataset NO2-SO2-NO (NSN)
# }
# NOT RUN {
alik(NSN,model="Pairwise",c(1,1,1,1),trace=2,sig=2)
alik(NSN,model="Husler",rep(1,3),trace=2,sig=2)
alik(NSN,model="Dirichlet",rep(0.1,3),trace=2,sig=2)
alik(NSN,model="Extremalt",c(-0.5,-0.4,-0.5,1),c=0.01,trace=2,sig=2)
alik(NSN,model="Asymmetric",c(rep(1.1,4),rep(0.1,9)),c=0.01,trace=2,sig=2)
# }
# NOT RUN {
## Dataset PM10-NO-NO2 (PNN)
# }
# NOT RUN {
alik(PNN,model="Pairwise",c(1,1,1,1),trace=2,sig=2)
alik(PNN,model="Husler",rep(1,3),trace=2,sig=2)
alik(PNN,model="Dirichlet",rep(0.1,3),trace=2,sig=2)
alik(PNN,model="Extremalt",c(-0.5,-0.4,-0.5,1),c=0.01,trace=2,sig=2)
alik(PNN,model="Asymmetric",c(rep(1.1,4),rep(0.1,9)),c=0.01,trace=2,sig=2)
# }
# NOT RUN {
## Dataset PM10-NO-NO2-SO2 (PNNS)
# }
# NOT RUN {
alik(PNNS,model="Pairwise",rep(1,choose(ncol(PNNS),2)+1),trace=2,sig=2)
alik(PNNS,model="Husler",rep(1,choose(ncol(PNNS),2)),trace=2,sig=2)
alik(PNNS,model="Dirichlet",rep(1,ncol(PNNS)),trace=2,sig=2)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab