[Vinecopula-commits] r33 - / pkg/R pkg/inst pkg/man

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Fr Okt 18 13:36:55 CEST 2013


Author: ulf
Date: 2013-10-18 13:36:53 +0200 (Fri, 18 Oct 2013)
New Revision: 33

Added:
   VineCopula_1.2.zip
Modified:
   pkg.pdf
   pkg/R/BiCopSelect.r
   pkg/R/RVineAIC.r
   pkg/R/RVineClarkeTest.R
   pkg/R/RVineStructureSelect.r
   pkg/R/RVineVuongTest.R
   pkg/inst/ChangeLog
   pkg/man/BiCopPar2Beta.Rd
   pkg/man/RVineGofTest.Rd
   pkg/man/RVinePar2Beta.Rd
   pkg/man/RVineStructureSelect.Rd
   pkg/man/RvineMatrixCheck.Rd
Log:
Tobias hatte noch ein paar kleine Fehler gefunden im Code als auch in der Dokumentation. Ich hoffe ich habe jetzt alle Stellen erwischt, in der die Tawn copula einen Einfluss hat.

Added: VineCopula_1.2.zip
===================================================================
(Binary files differ)


Property changes on: VineCopula_1.2.zip
___________________________________________________________________
Added: svn:mime-type
   + application/octet-stream

Modified: pkg/R/BiCopSelect.r
===================================================================
--- pkg/R/BiCopSelect.r	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/R/BiCopSelect.r	2013-10-18 11:36:53 UTC (rev 33)
@@ -22,7 +22,7 @@
 
   }else{
   
-    if(!is.na(familyset[1]) && (!any(c(1,2,5,23,24,26:30,33,34,36:40) %in% familyset) || !any(c(1:10,13,14,16:20) %in% familyset))) stop("'familyset' has to include at least one bivariate copula family for positive and one for negative dependence.")
+    if(!is.na(familyset[1]) && (!any(c(1,2,5,23,24,26:30,33,34,36:40,104,114,204,214) %in% familyset) || !any(c(1:10,13,14,16:20,124,134,224,234) %in% familyset))) stop("'familyset' has to include at least one bivariate copula family for positive and one for negative dependence.")
 
     emp_tau = fasttau(data1,data2,weights)
 

Modified: pkg/R/RVineAIC.r
===================================================================
--- pkg/R/RVineAIC.r	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/R/RVineAIC.r	2013-10-18 11:36:53 UTC (rev 33)
@@ -13,8 +13,8 @@
 	if(n != dim(RVM)) stop("Dimensions of 'data' and 'RVM' do not match.")
   if(!is(RVM,"RVineMatrix")) stop("'RVM' has to be an RVineMatrix object.")
   
-	npar = sum(RVM$family >= 1, na.rm=TRUE) + sum(RVM$family %in% c(2,7:10,17:20,27:30,37:40),na.rm=TRUE)
-  npar_pair = (RVM$family>=1)+(RVM$family%in%c(2,7:10,17:20,27:30,37:40))
+	npar = sum(RVM$family >= 1, na.rm=TRUE) + sum(RVM$family %in% c(2,7:10,17:20,27:30,37:40,104,114,124,134,204,214,224,234),na.rm=TRUE)
+  npar_pair = (RVM$family>=1)+(RVM$family%in%c(2,7:10,17:20,27:30,37:40,104,114,124,134,204,214,224,234))
 
   like = RVineLogLik(data,RVM)
 
@@ -38,8 +38,8 @@
 	if(n != dim(RVM)) stop("Dimensions of 'data' and 'RVM' do not match.")
   if(is(RVM) != "RVineMatrix") stop("'RVM' has to be an RVineMatrix object.")
   
-	npar = sum(RVM$family >= 1, na.rm=TRUE) + sum(RVM$family %in% c(2,7:10,17:20,27:30,37:40),na.rm=TRUE)
-  npar_pair = (RVM$family>=1)+(RVM$family%in%c(2,7:10,17:20,27:30,37:40))
+	npar = sum(RVM$family >= 1, na.rm=TRUE) + sum(RVM$family %in% c(2,7:10,17:20,27:30,37:40,104,114,124,134,204,214,224,234),na.rm=TRUE)
+  npar_pair = (RVM$family>=1)+(RVM$family%in%c(2,7:10,17:20,27:30,37:40,104,114,124,134,204,214,224,234))
 
   like = RVineLogLik(data,RVM)
 

Modified: pkg/R/RVineClarkeTest.R
===================================================================
--- pkg/R/RVineClarkeTest.R	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/R/RVineClarkeTest.R	2013-10-18 11:36:53 UTC (rev 33)
@@ -11,8 +11,8 @@
 	Model1.ll = RVineLogLik(data,RVM1,separate=TRUE)$loglik
 	Model2.ll = RVineLogLik(data,RVM2,separate=TRUE)$loglik
   
-	anz.1 = sum(RVM1$family >= 1, na.rm=TRUE) + sum(RVM1$family %in% c(2,7:10,17:20,27:30,37:40),na.rm=TRUE)
-	anz.2 = sum(RVM2$family >= 1, na.rm=TRUE) + sum(RVM2$family %in% c(2,7:10,17:20,27:30,37:40),na.rm=TRUE)
+	anz.1 = sum(RVM1$family >= 1, na.rm=TRUE) + sum(RVM1$family %in% c(2,7:10,17:20,27:30,37:40, 104,114,124,134,204,214,224,234),na.rm=TRUE)
+	anz.2 = sum(RVM2$family >= 1, na.rm=TRUE) + sum(RVM2$family %in% c(2,7:10,17:20,27:30,37:40, 104,114,124,134,204,214,224,234),na.rm=TRUE)
  
   B = sum(Model1.ll-Model2.ll > 0)
   B.Schwarz = sum(Model1.ll-Model2.ll-(anz.1-anz.2)*log(N)/(2*N) > 0)

Modified: pkg/R/RVineStructureSelect.r
===================================================================
--- pkg/R/RVineStructureSelect.r	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/R/RVineStructureSelect.r	2013-10-18 11:36:53 UTC (rev 33)
@@ -11,7 +11,7 @@
   if(d<2) stop("Dimension has to be at least 2.")
   if(any(data>1) || any(data<0)) stop("Data has be in the interval [0,1].")
 	
-  if(!is.na(familyset[1])) for(i in 1:length(familyset)) if(!(familyset[i] %in% c(0,1:10,13,14,16:20,23,24,26:30,33,34,36:40))) stop("Copula family not implemented.")  
+  if(!is.na(familyset[1])) for(i in 1:length(familyset)) if(!(familyset[i] %in% c(0,1:10,13,14,16:20,23,24,26:30,33,34,36:40, 104,114,124,134,204,214,224,234))) stop("Copula family not implemented.")  
   if(selectioncrit != "AIC" && selectioncrit != "BIC") stop("Selection criterion not implemented.")
   if(level < 0 & level > 1) stop("Significance level has to be between 0 and 1.")
   	

Modified: pkg/R/RVineVuongTest.R
===================================================================
--- pkg/R/RVineVuongTest.R	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/R/RVineVuongTest.R	2013-10-18 11:36:53 UTC (rev 33)
@@ -11,8 +11,8 @@
 	Model1.ll = RVineLogLik(data,RVM1,separate=TRUE)$loglik
 	Model2.ll = RVineLogLik(data,RVM2,separate=TRUE)$loglik
   
-	anz.1 = sum(RVM1$family >= 1, na.rm=TRUE) + sum(RVM1$family %in% c(2,7,8,9,10,17,18,19,20,27,28,29,30,37,38,39,40),na.rm=TRUE)
-	anz.2 = sum(RVM2$family >= 1, na.rm=TRUE) + sum(RVM2$family %in% c(2,7,8,9,10,17,18,19,20,27,28,29,30,37,38,39,40),na.rm=TRUE)
+	anz.1 = sum(RVM1$family >= 1, na.rm=TRUE) + sum(RVM1$family %in% c(2,7,8,9,10,17,18,19,20,27,28,29,30,37,38,39,40, 104,114,124,134,204,214,224,234),na.rm=TRUE)
+	anz.2 = sum(RVM2$family >= 1, na.rm=TRUE) + sum(RVM2$family %in% c(2,7,8,9,10,17,18,19,20,27,28,29,30,37,38,39,40, 104,114,124,134,204,214,224,234),na.rm=TRUE)
 
   if(all(Model1.ll-Model2.ll==0)){  # models are the same
   	V = 0

Modified: pkg/inst/ChangeLog
===================================================================
--- pkg/inst/ChangeLog	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/inst/ChangeLog	2013-10-18 11:36:53 UTC (rev 33)
@@ -21,6 +21,7 @@
   
 - Bug fix:
   * RVineStructureSelect: Corrected code for the igraph package
+  * RVineTreePlot: Now a 3-dimensional R-vine can be plotted too.
 
 - Documentation update
 

Modified: pkg/man/BiCopPar2Beta.Rd
===================================================================
--- pkg/man/BiCopPar2Beta.Rd	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/man/BiCopPar2Beta.Rd	2013-10-18 11:36:53 UTC (rev 33)
@@ -15,7 +15,6 @@
   \item{family}{An integer defining the bivariate copula family:\cr
 		\code{0} = independence copula \cr
 	        \code{1} = Gaussian copula \cr
-	        \code{2} = Student t copula (t-copula) \cr
 	        \code{3} = Clayton copula \cr
 	        \code{4} = Gumbel copula \cr
 	        \code{5} = Frank copula \cr
@@ -53,6 +52,7 @@
     \code{214} = rotated Tawn type 2 copula (180 degrees) \cr
     \code{224} = rotated Tawn type 2 copula (90 degrees)  \cr
     \code{234} = rotated Tawn type 2 copula (270 degrees) \cr
+    Note that the Student's t-copula is not allowed since the CDF of the t-copula is not implemented (see \code{\link{BiCopCDF}}).
 		}
   \item{par}{Copula parameter.}
   \item{par2}{Second parameter for the two parameter BB1, BB6, BB7, BB8, Tawn type 1 and type 2 copulas (default: \code{par2 = 0}).}

Modified: pkg/man/RVineGofTest.Rd
===================================================================
--- pkg/man/RVineGofTest.Rd	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/man/RVineGofTest.Rd	2013-10-18 11:36:53 UTC (rev 33)
@@ -14,7 +14,24 @@
 \arguments{
   \item{data}{An N x d data matrix (with uniform margins).} 
   \item{RVM}{\code{\link{RVineMatrix}} objects of the R-vine model under the null hypothesis. \cr
-  Note that the pair-copula families in the R-vine Matrix object have to be a member of the vector \code{(0,1:6,13,14,16,23,24,26,33,34,36)}}
+  Only the following copula families are allowed in \code{RVM$family} due to restrictions in \code{\link{RVineGrad}} and \code{\link{RVineHessian}}  \cr
+  	\code{0} = independence copula \cr
+		\code{1} = Gaussian copula \cr
+		\code{2} = Student t copula (t-copula)\cr
+		\code{3} = Clayton copula \cr
+		\code{4} = Gumbel copula \cr
+		\code{5} = Frank copula \cr
+		\code{6} = Joe copula \cr 
+		\code{13} = rotated Clayton copula (180 degrees; ``survival Clayton'') \cr
+		\code{14} = rotated Gumbel copula (180 degrees; ``survival Gumbel'') \cr
+		\code{16} = rotated Joe copula (180 degrees; ``survival Joe'') \cr 
+		\code{23} = rotated Clayton copula (90 degrees) \cr
+		\code{24} = rotated Gumbel copula (90 degrees) \cr
+		\code{26} = rotated Joe copula (90 degrees) \cr
+		\code{33} = rotated Clayton copula (270 degrees) \cr
+		\code{34} = rotated Gumbel copula (270 degrees) \cr
+		\code{36} = rotated Joe copula (270 degrees) \cr
+		}
   \item{method}{A string indicating the goodness-of-fit method:\cr
 		\code{"White"} = goodness-of-fit test based on White's information matrix equality (default) \cr
 		\code{"IR"} = goodness-of-fit test based on the information ratio \cr
@@ -30,7 +47,7 @@
 		\code{"AD"} = Anderson-Darling test statistic (only univariate for \code{"Breymann"}, \code{"Berg"} and \code{"Berg2"})
 		}
 	\item{B}{an integer for the number of bootstrap steps (default \code{B=200})\cr
-	For \code{B = 0} the asymptotic p-value is returned if available, otherwise only the the test statistic is returned.\cr
+	For \code{B = 0} the asymptotic p-value is returned if available, otherwise only the test statistic is returned.\cr
     WARNING: If \code{B} is chosen too large, computations will take very long.}
 	\item{alpha}{an integer of the set \code{2,4,6,...} for the \code{"Berg2"} goodness-of-fit test (default \code{alpha=2})}
 }
@@ -68,7 +85,7 @@
 }
 where \eqn{\boldsymbol{H}(\theta)} is the expected Hessian matrix and \eqn{\boldsymbol{C}(\theta)} is the expected outer product of the score function. \cr
 For the calculation of the test statistic we use the consistent maximum likelihood estimator \eqn{\hat{\theta}} and the sample counter parts of \eqn{\boldsymbol{H}(\theta)} and \eqn{\boldsymbol{C}(\theta)}. \cr
-The correction of the Covariance-Matrix in the test statistic for the uncertainty in the margins is skipped. The implemented tests assumes that where is no uncertainty in the margins. The correction can be found in Wanling and Prokhorov (2011) for bivariate copulas and in Schepsmeier (2013) for vine copulas. It involves multi-dimensional integrals. \cr
+The correction of the Covariance-Matrix in the test statistic for the uncertainty in the margins is skipped. The implemented test assumes that there is no uncertainty in the margins. The correction can be found in Wanling and Prokhorov (2011) for bivariate copulas and in Schepsmeier (2013) for vine copulas. It involves multi-dimensional integrals. \cr
 
 \code{method="IR"}: \cr
 As the White test the information matrix ratio test is based on the expected Hessian matrix \eqn{\boldsymbol{H}(\theta)} and the expected outer product of the score function \eqn{\boldsymbol{C}(\theta)}. \cr

Modified: pkg/man/RVinePar2Beta.Rd
===================================================================
--- pkg/man/RVinePar2Beta.Rd	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/man/RVinePar2Beta.Rd	2013-10-18 11:36:53 UTC (rev 33)
@@ -1,51 +1,52 @@
-\name{RVinePar2Beta}      
-\alias{RVinePar2Beta}
-
-\title{Blomqvist's beta values of an R-vine copula model}
-
-\description{
-This function computes the values of Blomqvist's beta corresponding to the parameters of an R-vine copula model.
-}
-
-\usage{
-RVinePar2Beta(RVM)
-}
-
-\arguments{
-  \item{RVM}{An \code{\link{RVineMatrix}} object.}
-}
-
-\value{
-Matrix with the same structure as the family and parameter matrices of the \code{\link{RVineMatrix}} object \code{RVM} where the entries
-are values of Blomqvist's beta corresponding to the families and parameters of the R-vine copula model given by \code{RVM}.
-}
-
-\author{Jeffrey Dissmann}
-
-\seealso{\code{\link{RVineMatrix}}, \code{\link{BiCopPar2Beta}}}
-
-\examples{
-# define 5-dimensional R-vine tree structure matrix
-Matrix = c(5,2,3,1,4,0,2,3,4,1,0,0,3,4,1,0,0,0,4,1,0,0,0,0,1)
-Matrix = matrix(Matrix,5,5)
-
-# define R-vine pair-copula family matrix
-family = c(0,1,3,4,4,0,0,3,4,1,0,0,0,4,1,0,0,0,0,3,0,0,0,0,0)
-family = matrix(family,5,5)
-
-# define R-vine pair-copula parameter matrix
-par = c(0,0.2,0.9,1.5,3.9,0,0,1.1,1.6,0.9,0,0,0,1.9,0.5,
-        0,0,0,0,4.8,0,0,0,0,0)
-par = matrix(par,5,5)
-
-# define second R-vine pair-copula parameter matrix
-par2 = matrix(0,5,5)
-
-# define RVineMatrix object
-RVM = RVineMatrix(Matrix=Matrix,family=family,par=par,par2=par2,
-                  names=c("V1","V2","V3","V4","V5"))
-
-# compute the Blomqvist's beta values
-BlomBeta = RVinePar2Beta(RVM)
-}
-
+\name{RVinePar2Beta}      
+\alias{RVinePar2Beta}
+
+\title{Blomqvist's beta values of an R-vine copula model}
+
+\description{
+This function computes the values of Blomqvist's beta corresponding to the parameters of an R-vine copula model.
+}
+
+\usage{
+RVinePar2Beta(RVM)
+}
+
+\arguments{
+  \item{RVM}{An \code{\link{RVineMatrix}} object. \cr
+  Note that the Student's t-copula is not allowed since the CDF of the t-copula is not implemented (see \code{\link{BiCopCDF}} and \code{\link{BiCopPar2Beta}}).}
+}
+
+\value{
+Matrix with the same structure as the family and parameter matrices of the \code{\link{RVineMatrix}} object \code{RVM} where the entries
+are values of Blomqvist's beta corresponding to the families and parameters of the R-vine copula model given by \code{RVM}.
+}
+
+\author{Ulf Schepsmeier}
+
+\seealso{\code{\link{RVineMatrix}}, \code{\link{BiCopPar2Beta}}}
+
+\examples{
+# define 5-dimensional R-vine tree structure matrix
+Matrix = c(5,2,3,1,4,0,2,3,4,1,0,0,3,4,1,0,0,0,4,1,0,0,0,0,1)
+Matrix = matrix(Matrix,5,5)
+
+# define R-vine pair-copula family matrix
+family = c(0,1,3,4,4,0,0,3,4,1,0,0,0,4,1,0,0,0,0,3,0,0,0,0,0)
+family = matrix(family,5,5)
+
+# define R-vine pair-copula parameter matrix
+par = c(0,0.2,0.9,1.5,3.9,0,0,1.1,1.6,0.9,0,0,0,1.9,0.5,
+        0,0,0,0,4.8,0,0,0,0,0)
+par = matrix(par,5,5)
+
+# define second R-vine pair-copula parameter matrix
+par2 = matrix(0,5,5)
+
+# define RVineMatrix object
+RVM = RVineMatrix(Matrix=Matrix,family=family,par=par,par2=par2,
+                  names=c("V1","V2","V3","V4","V5"))
+
+# compute the Blomqvist's beta values
+BlomBeta = RVinePar2Beta(RVM)
+}
+

Modified: pkg/man/RVineStructureSelect.Rd
===================================================================
--- pkg/man/RVineStructureSelect.Rd	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/man/RVineStructureSelect.Rd	2013-10-18 11:36:53 UTC (rev 33)
@@ -50,7 +50,15 @@
 		\code{37} = rotated BB1 copula (270 degrees) \cr
 		\code{38} = rotated BB6 copula (270 degrees) \cr
 		\code{39} = rotated BB7 copula (270 degrees) \cr
-		\code{40} = rotated BB8 copula (270 degrees) 
+		\code{40} = rotated BB8 copula (270 degrees) \cr
+    \code{104} = Tawn type 1 copula \cr
+    \code{114} = rotated Tawn type 1 copula (180 degrees) \cr
+    \code{124} = rotated Tawn type 1 copula (90 degrees)  \cr
+    \code{134} = rotated Tawn type 1 copula (270 degrees) \cr
+    \code{204} = Tawn type 2 copula  \cr
+    \code{214} = rotated Tawn type 2 copula (180 degrees) \cr
+    \code{224} = rotated Tawn type 2 copula (90 degrees)  \cr
+    \code{234} = rotated Tawn type 2 copula (270 degrees) \cr
 		}
   \item{type}{Type of the vine model to be specified:\cr
     \code{0} or \code{"RVine"} = R-vine (default)\cr

Modified: pkg/man/RvineMatrixCheck.Rd
===================================================================
--- pkg/man/RvineMatrixCheck.Rd	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg/man/RvineMatrixCheck.Rd	2013-10-18 11:36:53 UTC (rev 33)
@@ -12,7 +12,7 @@
 
 \arguments{
   \item{M}{A dxd vine matrix: only lower triangle is used;
-For the check, M is assumed to be in natural order, i.e. 1:d on diagonal.
+For the check, M is assumed to be in natural order, i.e. d:1 on diagonal.
 Further M[j-1,j]=j-1 and M[j,j]=j
 }
 }

Modified: pkg.pdf
===================================================================
--- pkg.pdf	2013-10-17 13:14:59 UTC (rev 32)
+++ pkg.pdf	2013-10-18 11:36:53 UTC (rev 33)
@@ -310,13 +310,11 @@
 stream
 xYr6+4x|tLc+qSOfv0	KIB!!ݯ/@ 4h! 88 ``pzz8
  1
-W$q"8"8a5[i)aJ\oJ;m'ء1H4q2[CJ^Am`GՅ,Ʊ8bm(bD5ߝfb
-RBisB
-qwHpSU"gSWu@WzqCa^8M+d=I |xQGv3?Ͳ0!y,!3iѫFcVM(^:<ۊ8c׆
-P__[Uc֌ն{|Uvyqla86ȭ:gVGӣ ҳe`Rkc{?@_`3uю!@Q)|+r;_YݨZ6e֫-P咷	Q̦b~ZfJFǬVdp:YֆFnDM+_<*3,w=]d3f6E7oץl͝Y0lլkE[5?3bt)r{ʙ\
-׭j64,LLs>kCrP+ӆZ<eK]VTvJAXIYl9uΪu)˸|0ltDUF^~nŵ~LýVzs<(~{r76pYɃYVå4$!YdC0I,4h}uzVmZj8=ÙyG6kzqv,d7F}$+F2o	/PHc{vTHQߎÑ,ޜk(dTz?DQCz3[cرaab>i2P}.Q	7iИm?=
->͘[\sqa7<yi}2{cp'?ɸCWBACtxN{!Mϣ|GZqH|9q(尧~E_CKվ	G_Or 
-O?t6[BOB'|49'xŽ,ޔ`tB?ceñYl{S at 1?M^S
+W$q"8"8a5[i)aJ\oJ;m'ء1H4q2[CJ^Ac)Ycc)Dq0QJ4&wk;3'>
+sf(	%J'B"Ļ+DDJx܁(Fh[yf;a>p›Vz,> -fL=e
+aBXBfҖWSFd3Qһtx_q{Ǯ
+$C'ƬmbuZixɛqm[uD􇏦G	@g8(~jS/6g|6B}oCR'W@kw|ՍeSX6lyuY.ylA]<)M/jv*hnjpzڼkHIvh	ӚhmiF=Թq)klw;:JrӥMv:nX+m#^t㸉v]ʆ)ٛS̶XʻV/U33#6H..woIͅ~~ݪfMs4Jp3ѸV:$Z?mxţ,]=Lԅ8nEltTŖXZ^_FGT;hV\Kk4[lK^n
+^8dz~</Yn*>	+wcSjJ͞L1<@le9\zOCEv11p;BÉY_ۡnܶ>5F#-:-di/ghjG6qcd7LbT(Sh֝ ED1gG ^H:")[BIC@<7#%8+&'oe}oPCӣcьkEx;g֌~C'7wr s{<{<}%.>}t9dO'74><ʧ| }ܟ;RX{W>$AT;pd!'@tM`%$9$1|"χ+M{m]yL	;M	Fȟ/83V]L8:[G1`tkѿWZ
 endstream
 endobj
 202 0 obj <<
@@ -442,23 +440,23 @@
 /ProcSet [ /PDF /Text ]
 >> endobj
 280 0 obj <<
-/Length 1372      
+/Length 1371      
 /Filter /FlateDecode
 >>
 stream
-xKw6,Bx,;I3g2'&J4;6HHHB߽\]		Yf%	KBZG#AhE!(*l|]}8΃&T=	-
->/m-K#fH7%'T@$s5ˢ)q)' I ؅ت䭊~YwnL7Ϫ.{	;?
-(zp'Ou|j
-;nG(dWNl&:na=u0u뀙Fw#/.8
-'/yqIb$0	UbG!=GX}mʼnݖ<gՓ#<{J̴i(a#Zt?l]f"50?H{xVE- N d-z=?;اqQ{WN	
-w&^al4~h
-oC3{r<Plȟ"!e`c|'wp~u-Xm?EGXG6?$ŏgÚJ<D"X<}z~ϑ&"cY*
-ݚ[Fq4bzqc3iĚ= 16g\F1?SyxphnWƓX#E^I}ՄnB~B1Ge]T\ıٹpڴi+/;%+P6/l)~g<Yg7!1?Ѿ}lFY.'KBwOȋilJ.EƟu-?[(ٷ=8C[fvYd~H[un T#
-sk97G0=#/|\_SU$.-ֈ)rrHd"*|Pw	i\ݵs
-PPG#`SGN+mDYWkQCQ"]vl?E*O?tD=^Ҭcf1
-^_7}j0Wߔe{`x%yapegߚ6|m^V)Hɵ
-ԢEކojQzQUXW?Ek*A/_ԝźMcP4e{~/0 
-lBD敊[ˋF<Q)ι`)7YlڍJυ	uY5Kdm.GDz7x]`4PެˬV>;Jey](Ҽx&mO셒u.rE3ֺZ;~*muQ]y_n7~\ä,;Ⱦz"{P	"WV7@IGZoKVpH#O~xw{j
+xKw6,Bx,;I3g2g:t
+(i_+$;6HHHB߽\]		Yf%	KBZ;G#AhE!(*pv	=L"{"[|^nۜ[>{.͐nMK.N(H$U=j
+ESRDmOA@yU[r51A6<B%06<|SUq82G!'uGrbd3/qcL끬[<5C]
+q	i`O?s6K#	NpĨ?
+
+4?8kk7Vdt8ND,9SbMCYa~fF'Wa005ɅAASś*j9't \of>0gػr"0HoG 3
+cGcWxGqؓ_wbCT,88!=׵`a?|laM%\w"Dhk>oHS?ՆnM#81ixḱ4MbMFx2{Abl1θc~ڧ$Gze<ɉ0¯\Njn		ƅ7bǏ&*cs$#<eSiV_w;&vJVv缔K14eoBb>r}~ٌ"\<O;;g!r1ŏ\?[Eq(Q.VǙ=ᅵWq!t3Yd~H[un T#
+sk97G0=#/|\_SU$.-ֈ)rwrHd"*S	i\ݵs
+PPG#`SGN+mDYWkQCQ"]vlߵE*OuD=^Ҭcf1
+^_7}j0Wߔe[`x%yapegߚ6|m^V)gHɵ
+?עEކoj~D*[wd+T"5} ޗ/}b]ox1(2]-?E6DGYJk,ϟUJsn($XJ
+{vsvb]}ͪ!~h/f^eM^X7*72*RY^*&4o3I{$#32unCbK傫\Q茵-DJ['ET.(hW%ۍ00)/)Ȟ*T‡•
+{}eے,`$҈䓯^d
 endstream
 endobj
 279 0 obj <<
@@ -600,7 +598,7 @@
 /Subtype /Link
 /Border[0 0 0]/H/I/C[1 0 0]
 /Rect [501.13 516.281 513.085 525.128]
-/A << /S /GoTo /D (page.64) >>
+/A << /S /GoTo /D (page.65) >>
 >> endobj
 261 0 obj <<
 /Type /Annot
@@ -613,8 +611,8 @@
 /Type /Annot
 /Subtype /Link
 /Border[0 0 0]/H/I/C[1 0 0]
-/Rect [501.13 492.371 513.085 501.217]
-/A << /S /GoTo /D (page.68) >>
+/Rect [501.13 492.251 513.085 501.217]
+/A << /S /GoTo /D (page.69) >>
 >> endobj
 263 0 obj <<
 /Type /Annot
@@ -705,7 +703,7 @@
 /Subtype /Link
 /Border[0 0 0]/H/I/C[1 0 0]
 /Rect [501.13 336.834 513.085 345.8]
-/A << /S /GoTo /D (page.89) >>
+/A << /S /GoTo /D (page.90) >>
 >> endobj
 276 0 obj <<
 /Type /Annot
@@ -751,11 +749,11 @@
 FA @^IH,͎C		yى@ʊ
 >z(_!/.t/$0R:OU]*DzؘfO ^&aQ:7>D\uqXsek*4$
 :P)9-3bk%ϱY\`R=&>]w+MITXWs!alLj\T"@6 ui(M4Y$+HBa8й6"!mlo7ݽM*j]ꨮ"'m04x=I. _/q=}S!^fLjP9q׫2Ýo%=Hޣ;rg!w (I4:^ۋNjP~NrQ4'
-9H~ G/Dm'Ƕ=~@K,'Х~?rp}_	wya쩢ȏdnו=U vוĽ pZ
+9H~ G/Gm'Ƕ=~@K,'Х~?rp}_	wya쩢ȏdnו=U vוĽ pZ
 ]!Ym̾,b/WK#Qe4)|
 	Ih][=nnM8Ufb?cstY{y_\@sG/y0sg>c)s:8;w’8	75/6"
 =qPm/EW8_]؅5#rE1?ÈcvU\L\:#*w{
-H}yK#~F_"n?̸>i#e{H%^1tD6G6د?_j[s
+H}yK#~F_"n?̸>i#e{H%^1tD6G6د?_[[r
 endstream
 endobj
 323 0 obj <<
@@ -781,7 +779,7 @@
 /D [323 0 R /XYZ 100.346 510.652 null]
 >> endobj
 333 0 obj <<
-/D [323 0 R /XYZ 100.346 279.09 null]
+/D [323 0 R /XYZ 100.346 279.1 null]
 >> endobj
 322 0 obj <<
 /Font << /F43 281 0 R /F36 226 0 R /F35 225 0 R /F14 328 0 R /F8 329 0 R /F11 330 0 R /F22 227 0 R >>
@@ -792,33 +790,27 @@
 /Filter /FlateDecode
 >>
 stream
-xYYsܸ~ӆSHvNy$yW.U$yS3ÿ~
-!ʲJ6/i }|
-yG#ݫ7σ(sXG7# s@Gpy0"uE$]YK9V.Ǜ4$dTD3+cWWwzJۋ̣Q$L)ďeT>;U
-^Mpy,wU	Oİg3$}vWm'go_h #,31'd,FsQi/0M_|c4ߴ]8o`}6^zaB\7YY7JJșC7KD@3oDD%<f8bF?xрn
-3%8v|OƉөRC|Wxg[;
-1@]EW'è uG	mAG
-MGu]+)̝Iěi7*psNcFBbQ[u"4seWN 5,X.?i<mPm!Kw2_x~5j{^ws0
-:V݊YK fmy7
-O;p/&>8ZZ's/X7GzpjnQ
-]-p6kթ^ v"E740
-3]ݘ"	i`UxB9OKRS7翨#yM^FCBɢrzOCY.H!]CbL+$7DQP@*kѲZę]"ZW9e6e95NG5$2UR$ʒlU*d)Үx0LM1MF`f
-c`]4=NDd.fh"N	߬v5Q%a2W)wZyo(\-g8ˈGbp4Sa~;xB7K6nsݝ.
-3q`ΰ !|IE
-LloO-$}~{;(u˖Rr:תښc0mݱEnI~[xRK-YX(lQ+(%2m'
-=$d
-\๹5eSީfm
-?T\rUN*UlFRdpה#g&ni~R.$-(mM?fI/t~`(s} /"/+)3LN1A2)ΕVkգǡ󮗖r.b\pL	6BE`lCH[T~4FȤu^0eTYBgZMayހe6^}ѠIty?VeIulurN5'ٲY&r4VrZHX֖Oerx;}dʎ'MkU(qTJ}!L"<ڪn&C\P|^CpnZ-逛膞p.	zL]{gC٪-ME˷
-֯VUзJŀgڿkPe\0F}]:e˸5icQCF/Uj&3TSu/b ӏRm:Ҿҩ&C	v@ܗ#jcQ`Bmpj{=rP(V!y{Њzmxn˝؅.~
-X=<bgv.y֑UhrDH<pvg@SI&qct
-b'tcz*5
--@2]i`au3fI1U*&'8
-(@ua
-RKpqɊ0Ɇ%)*?9hY(v5@VfiUsMٗ`5pu~S.B%sR/8s0O H#%4xЄr A"␟	l荇%la;iBWsR@ G{ݭ^n6WdUAwa=+;ɺJ&( +jCo"4^ֲHI3IA*Hxs[27Y#v+Z
-̭]8۾F~ؚ ~lJg}S2}<<g+x|| \bhR`Ia/}QIW$sdx#]u1Pj@&ReynY
-W]L$=fn<%L2;&T3bhˀU1*HŴ}"-1Zv|m7_"I@a	?=IzWu*?pDp`sCfy|cǟs(s$>p& TsGXL({vr^զ o[2Yӣ^wG`i k!>>`b՞_ĮͿD87\c2DZQ
-<YzI=
-'A@P$U>|+Ҡh^v$8 48l9_L*!@3N!1ᄁiͫ_
+xYYo6~_᧬EΞ=
+lOy`KZjbՇ干.}1Ru*:8=
+^xu<Lr?Odrt}s$(M?uyދf?]9>PfScY~%gjh6CUܩ[{f;e&00IHr.^exJ=M=="ڿ8eʔRDݶZw(ήRF~g(D{9?K-O$!vU)OS`3y=ݓ/yz4ED	<<q<a7ϛ&E(sǂ'Yiqxxx)D'U2qE&yۍ&ҞPWCd}?"G\2ChknO-ILx	fIt"ie~$V2eqq=
+3?!DƙX2UW=S̝)V
+ą".\7ШxE晎heS\kշ5{	0mʡ@GOM׭UtO[ʟcZ@)>^Xn۽a^4uLѪ_1x	$ѬۡVI~ ^h?V9\imuiԷ`TzժuKmh%Lc]Z{ߨimT4u<)|7 CG))ĩc`5˟uѓF`yh/t{!fzO@Y.?H]c
+L+$7DQP@575ޕb΢ksj,jH})2UQ$t/.U).yL5M[3MF`f-c`n]4wOy'(Uw7Mf4qJoNQ[K0YjH`FMyo$}-:˄GFrt4Sa"heE~pϗy+c5Gݴ
+.a"uKR0ԓޞZY?"w&."V-:M1u5OFqaSiL$DŽn2.oQe;j%bPD&vòU۸Abk3 27K<wtp6Æwi{MWxw5fvW/]d# 5[j:TkmJEJ(:[;O.LY2Y*K3\Eey>eǕrpzZ)&3#T"|й*޿V~y(
+XY΀-3B‡Tk
+}z0L!dhpH_zS][b	dU{'6+_9"O>8P,07hy[*سz$rѬ7jxd_oh =5xUaCj +F2}`ImvBvX&r:Nr:HXΕOerx
+;}dʞ'm2k]jqTJ}&b<ڪi&c
+sAhAND7Fh7zp6F~_ZԴ|<`̯tKsLjU8ZKQƥAPkDuo};>̠b,~bɑwޚ[uɌD앺#Db=ȩX2 EGU:|(7vD-|7L
+N| G5+UHgsQm[%%er[Wh*#V"N.piN$+
+#Y%t#պL
+A$ـI	$tOuLYî^l$QچTG>[\
+6Nj،-n*`@#дPt
+f)COF1ǔ`T:AjwKVdGi>NqY 
+PaA͊VIҶJKf;5ϧau><*vcx sL)k;[LX8/H#{4`Єp0Eck][$l[#i<WgRBZ {ӯ\m6.UCWa
+zz\Z%7PՎ9F
+$<w4CNhYfepБ IDb:]>Lml={+r3ΰb&PJ=vHR264l@_ ϙEo;L,5lu/8j!q~GHwUo=>bțҦO-K}\Qj? e|_Y'ď=$ccp/1a;9A$ZTڈTFm|/mCp<צ%=Q~Oz B48pУ4@X/^7B;+D34};G`νK7X <ĹɁ0qFLĚ;ΧD#	KzXw׽Uf6&"}`roml_{-vޞ	ˢ-DKU{Ǐ]czV9`ށ_R0{"6Ҳ"
+H`s;H:oVp
+x>2<:u$	XÄbӠFh^v$8 88_,l۩1@3N!1ᄁy-_
 endstream
 endobj
 338 0 obj <<
@@ -832,41 +824,41 @@
 334 0 obj <<
 /Type /Annot
 /Border[0 0 0]/H/I/C[0 1 1]
-/Rect [396.522 229.332 513.085 240.236]
+/Rect [396.522 229.331 513.085 240.235]
 /Subtype/Link/A<</Type/Action/S/URI/URI(http://mediatum.ub.tum.de/node?id=1079276)>>
 >> endobj
 345 0 obj <<
 /Type /Annot
 /Border[0 0 0]/H/I/C[0 1 1]
-/Rect [117.35 219.085 209.006 228.092]
+/Rect [117.35 219.114 209.006 228.08]
 /Subtype/Link/A<</Type/Action/S/URI/URI(http://mediatum.ub.tum.de/node?id=1079276)>>
 >> endobj
 335 0 obj <<
 /Type /Annot
 /Border[0 0 0]/H/I/C[0 1 1]
-/Rect [406.485 189.421 513.085 200.325]
+/Rect [406.485 189.42 513.085 200.364]
 /Subtype/Link/A<</Type/Action/S/URI/URI(http://www.jstatsoft.org/v52/i03/)>>
 >> endobj
 346 0 obj <<
 /Type /Annot
 /Border[0 0 0]/H/I/C[0 1 1]
-/Rect [117.35 177.889 179.119 188.18]
+/Rect [117.35 177.888 179.119 188.169]
 /Subtype/Link/A<</Type/Action/S/URI/URI(http://www.jstatsoft.org/v52/i03/)>>
 >> endobj
 340 0 obj <<
 /D [338 0 R /XYZ 99.346 773.487 null]
 >> endobj
 341 0 obj <<
-/D [338 0 R /XYZ 100.346 642.803 null]
+/D [338 0 R /XYZ 100.346 642.794 null]
 >> endobj
 342 0 obj <<
-/D [338 0 R /XYZ 100.346 525.641 null]
+/D [338 0 R /XYZ 100.346 525.634 null]
 >> endobj
 343 0 obj <<
-/D [338 0 R /XYZ 100.346 432.389 null]
+/D [338 0 R /XYZ 100.346 432.384 null]
 >> endobj
 344 0 obj <<
-/D [338 0 R /XYZ 100.346 386.959 null]
+/D [338 0 R /XYZ 100.346 386.955 null]
 >> endobj
 337 0 obj <<
 /Font << /F36 226 0 R /F43 281 0 R /F8 329 0 R /F14 328 0 R /F11 330 0 R /F35 225 0 R /F22 227 0 R >>
@@ -906,7 +898,7 @@
 336 0 obj <<
 /Type /Annot
 /Border[0 0 0]/H/I/C[0 1 1]
-/Rect [178.769 717.945 384.996 728.365]
+/Rect [178.769 717.955 384.996 728.365]
 /Subtype/Link/A<</Type/Action/S/URI/URI(http://mediatum.ub.tum.de/node?id=1145695)>>
 >> endobj
 347 0 obj <<
@@ -924,13 +916,13 @@
 354 0 obj <<
 /Type /Annot
 /Border[0 0 0]/H/I/C[0 1 1]
-/Rect [117.35 499.698 243.876 509.989]
+/Rect [117.35 499.698 243.876 509.979]
 /Subtype/Link/A<</Type/Action/S/URI/URI(http://arxiv.org/abs/1306.0818)>>
 >> endobj
 349 0 obj <<
 /Type /Annot
 /Border[0 0 0]/H/I/C[0 1 1]
-/Rect [117.35 470.93 268.782 481.221]
+/Rect [117.35 470.93 268.782 481.211]
 /Subtype/Link/A<</Type/Action/S/URI/URI(http://arxiv.org/abs/1309.5808)>>
 >> endobj
 350 0 obj <<
@@ -968,20 +960,21 @@
 /ProcSet [ /PDF /Text ]
 >> endobj
 366 0 obj <<
-/Length 1192      
+/Length 1221      
 /Filter /FlateDecode
 >>
 stream
-xڵWIo6W2kHJ9d0mɁ[GK}ԣKFVҋ)Rnki|:tr+tBθ5}(!q+]fM֝ӯ<%r"EҒ#bo]4w&,ЇxF=|Lҹ*:[8šPpaTYx|a_;zwV
-G.)z	Dɢe.ZM3U>+e.cJ7LYOc2,VE-+q2.6jD0kB>M+2X]	0
-5	xm }'$U\8j Fo<*J<[T2I:U,#Σt	3^/D
-J!Y\d{J8ot;Yyi<G@<1=yN(X'9;W|KͽTRu8¸L
-ڭ(! {c:Y%WeNMH\$ȔpYJreTr,	@ib+Jۆ%W}Gݴ?K<kqCa=עA[݌ܣO
-fnپ	s	ȣ٘zۇ*mU1v5<=&UvmvzGGgxL&oT1ϣuM?]E
-m-؊
-4BuB1yebԷ
-,v=SM}PVL q?^aӣ]ȥ_I=maD^)i'Lr=6Uui6@bo‷;5hDCchePU3uc.>?GSQh%w;[t:'ٌ͂oEkF+mB}'0^̷]&tDj"a ;rw8:^x0{jwQ
-GSYE$cTKܞ*.b̆hQ%3PTpO{ '9A7:=@&;g^WWAׇZ.Eukʕ*~7sՋ"xo=>؛} U>v׃A}hb oѼÁ˛ŇGbK}>
+xڵWKo6W2k)9Y`M%c3P==PC)ge%"5EE/Ӆǭ	9r	q<ƭ5_Z76ο~`^GENlsv~%'Ĩ~ʬ3>ěW^SW*]wQX3W8\q<<FEy4Q_ؗ^
+}G)z	Dɢe.FK
+w|R\,.32]f	>?No<w*jk=_'i*5.[3uBGrYFk9b_+8jƜ7㐯VE*.Tj\Jo"*J<[V2I6U,#ɣt	+^"kPI\d/q->^lS?sYAyҺ˜#xMmƘ
[TRUNCATED]

To get the complete diff run:
    svnlook diff /svnroot/vinecopula -r 33


Mehr Informationen über die Mailingliste Vinecopula-commits