[spcopula-commits] r144 - in pkg: . demo man tests
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Tue May 26 16:41:36 CEST 2015
Author: ben_graeler
Date: 2015-05-26 16:41:35 +0200 (Tue, 26 May 2015)
New Revision: 144
Modified:
pkg/DESCRIPTION
pkg/NAMESPACE
pkg/demo/MRP.R
pkg/demo/pureSpVineCopula.R
pkg/demo/stCoVarVineCop.R
pkg/demo/stVineCopFit.R
pkg/demo/tailDepFunctions.R
pkg/man/condSpVine.Rd
pkg/man/condStCoVarVine.Rd
pkg/man/condStVine.Rd
pkg/man/spCopPredict.Rd
pkg/man/spVineCopula.Rd
pkg/man/stCoVarVineCopula.Rd
pkg/man/stCopPredict.Rd
pkg/man/stVineCopula.Rd
pkg/man/tailDepFun.Rd
pkg/tests/spCopulaTest.Rout.save
pkg/tests/stCopulaTest.Rout.save
Log:
- solved long lasting issue of warning on overloading pobs from copula by vineCopula on package installation
Modified: pkg/DESCRIPTION
===================================================================
--- pkg/DESCRIPTION 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/DESCRIPTION 2015-05-26 14:41:35 UTC (rev 144)
@@ -1,17 +1,17 @@
Package: spcopula
Type: Package
-Title: copula driven spatial analysis
+Title: Copula Driven Spatio-Temporal Analysis
Version: 0.2-1
-Date: 2015-05-25
+Date: 2015-05-26
Authors at R: c(person("Benedikt", "Graeler", role = c("aut", "cre"),
email = "ben.graeler at uni-muenster.de"),
person("Marius", "Appel",role = "ctb"))
Maintainer: Benedikt Graeler <ben.graeler at uni-muenster.de>
-Description: This package provides a framework to analyse via copulas spatial and spatio-temporal data provided in the format of sp and spacetime package respectively. Additionally, support for calculating different multivariate return periods is implemented.
+Description: We provide a framework to analyse spatial and spatio-temporal data via copulas and vine copulas. The data needs to be provided in the form of the sp and spacetime package respectively. Additionally, support for calculating different multivariate return periods based on copulas and vine copulas is implemented.
License: GPL-3
LazyLoad: yes
-Depends: copula (>= 0.999-12), VineCopula (>= 1.4), R (>= 3.1.0)
-Imports: methods, sp, spacetime (>= 1.0-9)
+Depends: copula (>= 0.999-12), R (>= 3.1.0)
+Imports: methods, sp, spacetime (>= 1.0-9), VineCopula (>= 1.4)
Suggests: evd
URL: http://r-forge.r-project.org/projects/spcopula/
Collate:
Modified: pkg/NAMESPACE
===================================================================
--- pkg/NAMESPACE 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/NAMESPACE 2015-05-26 14:41:35 UTC (rev 144)
@@ -1,7 +1,35 @@
-import(copula, VineCopula)
+import(copula)
import(sp, spacetime)
import(methods)
+importMethodsFrom(VineCopula, fitCopula)
+importMethodsFrom(VineCopula, dduCopula,ddvCopula)
+
+importFrom(VineCopula, BB1Copula, surBB1Copula, r90BB1Copula, r270BB1Copula)
+importFrom(VineCopula, BB6Copula, surBB6Copula, r90BB6Copula, r270BB6Copula)
+importFrom(VineCopula, BB7Copula, surBB7Copula, r90BB7Copula, r270BB7Copula)
+importFrom(VineCopula, BB8Copula, surBB8Copula, r90BB8Copula, r270BB8Copula)
+importFrom(VineCopula, joeBiCopula, surJoeBiCopula, r90JoeBiCopula, r270JoeBiCopula)
+importFrom(VineCopula, surClaytonCopula, r90ClaytonCopula, r270ClaytonCopula)
+importFrom(VineCopula, surGumbelCopula, r90GumbelCopula, r270GumbelCopula)
+importFrom(VineCopula, tawnT1Copula, surTawnT1Copula, r90TawnT1Copula, r270TawnT1Copula)
+importFrom(VineCopula, tawnT2Copula, surTawnT2Copula, r90TawnT2Copula, r270TawnT2Copula)
+importFrom(VineCopula, vineCopula)
+importFrom(VineCopula, copulaFromFamilyIndex)
+importFrom(VineCopula, TauMatrix, BiCopSelect)
+
+importClassesFrom(VineCopula, BB1Copula, surBB1Copula, r90BB1Copula, r270BB1Copula)
+importClassesFrom(VineCopula, BB6Copula, surBB6Copula, r90BB6Copula, r270BB6Copula)
+importClassesFrom(VineCopula, BB7Copula, surBB7Copula, r90BB7Copula, r270BB7Copula)
+importClassesFrom(VineCopula, BB8Copula, surBB8Copula, r90BB8Copula, r270BB8Copula)
+importClassesFrom(VineCopula, joeBiCopula, surJoeBiCopula, r90JoeBiCopula, r270JoeBiCopula)
+importClassesFrom(VineCopula, surClaytonCopula, r90ClaytonCopula, r270ClaytonCopula)
+importClassesFrom(VineCopula, surGumbelCopula, r90GumbelCopula, r270GumbelCopula)
+importClassesFrom(VineCopula, tawnT1Copula, surTawnT1Copula, r90TawnT1Copula, r270TawnT1Copula)
+importClassesFrom(VineCopula, tawnT2Copula, surTawnT2Copula, r90TawnT2Copula, r270TawnT2Copula)
+importClassesFrom(VineCopula, vineCopula)
+
+
# constructor
export(asCopula, cqsCopula)
export(tawn3pCopula)
Modified: pkg/demo/MRP.R
===================================================================
--- pkg/demo/MRP.R 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/demo/MRP.R 2015-05-26 14:41:35 UTC (rev 144)
@@ -1,3 +1,5 @@
+library("VineCopula")
+
## get the data
data("simulatedTriples")
Modified: pkg/demo/pureSpVineCopula.R
===================================================================
--- pkg/demo/pureSpVineCopula.R 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/demo/pureSpVineCopula.R 2015-05-26 14:41:35 UTC (rev 144)
@@ -1,6 +1,5 @@
## librarys ##
-library("spcopula")
-# library("evd")
+library("VineCopula")
library("sp")
par(mfrow=c(1,1))
## meuse - spatial poionts data.frame ##
Modified: pkg/demo/stCoVarVineCop.R
===================================================================
--- pkg/demo/stCoVarVineCop.R 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/demo/stCoVarVineCop.R 2015-05-26 14:41:35 UTC (rev 144)
@@ -6,6 +6,7 @@
# sary to maintain the "runability" of this demo.
######################################################################
library("spcopula")
+library("VineCopula")
library("evd")
data("EU_RB")
Modified: pkg/demo/stVineCopFit.R
===================================================================
--- pkg/demo/stVineCopFit.R 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/demo/stVineCopFit.R 2015-05-26 14:41:35 UTC (rev 144)
@@ -2,6 +2,7 @@
## selected smaller subset of the original data to reduce calculation demands.
## Thus, results are likely to differ (a little) from the original study.
+library("VineCopula")
library("spcopula")
data("EU_RB_2005")
Modified: pkg/demo/tailDepFunctions.R
===================================================================
--- pkg/demo/tailDepFunctions.R 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/demo/tailDepFunctions.R 2015-05-26 14:41:35 UTC (rev 144)
@@ -1,3 +1,4 @@
+library("VineCopula")
library("spcopula")
data("simulatedTriples")
Modified: pkg/man/condSpVine.Rd
===================================================================
--- pkg/man/condSpVine.Rd 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/man/condSpVine.Rd 2015-05-26 14:41:35 UTC (rev 144)
@@ -35,6 +35,7 @@
\code{\linkS4class{spVineCopula}}
}
\examples{
+library("VineCopula")
data("spCopDemo")
calcKTauPol <- fitCorFun(bins, degree=3)
Modified: pkg/man/condStCoVarVine.Rd
===================================================================
--- pkg/man/condStCoVarVine.Rd 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/man/condStCoVarVine.Rd 2015-05-26 14:41:35 UTC (rev 144)
@@ -43,6 +43,7 @@
}
\examples{
+library("VineCopula")
spCopT0 <- spCopula(components=list(claytonCopula(8), claytonCopula(4),
claytonCopula(2), claytonCopula(1),
claytonCopula(0.5), indepCopula()),
Modified: pkg/man/condStVine.Rd
===================================================================
--- pkg/man/condStVine.Rd 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/man/condStVine.Rd 2015-05-26 14:41:35 UTC (rev 144)
@@ -36,6 +36,7 @@
}
\examples{
# a spatio-temporal C-vine copula (with independent copulas in the upper vine)
+library("VineCopula")
spCopT0 <- spCopula(components=list(claytonCopula(8), claytonCopula(4),
claytonCopula(2), claytonCopula(1),
Modified: pkg/man/spCopPredict.Rd
===================================================================
--- pkg/man/spCopPredict.Rd 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/man/spCopPredict.Rd 2015-05-26 14:41:35 UTC (rev 144)
@@ -39,6 +39,7 @@
}
\examples{
library("sp")
+library("VineCopula")
data("meuse.grid")
coordinates(meuse.grid) <- ~x+y
gridded(meuse.grid) <- TRUE
Modified: pkg/man/spVineCopula.Rd
===================================================================
--- pkg/man/spVineCopula.Rd 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/man/spVineCopula.Rd 2015-05-26 14:41:35 UTC (rev 144)
@@ -25,6 +25,7 @@
}
\examples{
# a spatial C-vine copula (with independent dummy copulas in the upper vine)
+library("VineCopula")
data("spCopDemo")
calcKTauPol <- fitCorFun(bins, degree=3)
Modified: pkg/man/stCoVarVineCopula.Rd
===================================================================
--- pkg/man/stCoVarVineCopula.Rd 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/man/stCoVarVineCopula.Rd 2015-05-26 14:41:35 UTC (rev 144)
@@ -38,6 +38,7 @@
\examples{
# a spatio-temporal C-vine copula (with independent copulas in the upper vine)
+library("VineCopula")
spCopT0 <- spCopula(components=list(claytonCopula(8), claytonCopula(4),
claytonCopula(2), claytonCopula(1),
claytonCopula(0.5), indepCopula()),
Modified: pkg/man/stCopPredict.Rd
===================================================================
--- pkg/man/stCopPredict.Rd 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/man/stCopPredict.Rd 2015-05-26 14:41:35 UTC (rev 144)
@@ -36,6 +36,7 @@
\examples{
library("sp")
library("spacetime")
+library("VineCopula")
spCopT0 <- spCopula(components=list(claytonCopula(8), claytonCopula(4),
claytonCopula(2), claytonCopula(1),
Modified: pkg/man/stVineCopula.Rd
===================================================================
--- pkg/man/stVineCopula.Rd 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/man/stVineCopula.Rd 2015-05-26 14:41:35 UTC (rev 144)
@@ -21,6 +21,8 @@
}
\examples{
# a spatio-temporal C-vine copula (with independent copulas in the upper vine)
+library("VineCopula")
+
spCopT0 <- spCopula(components=list(claytonCopula(8), claytonCopula(4),
claytonCopula(2), claytonCopula(1),
claytonCopula(0.5), indepCopula()),
Modified: pkg/man/tailDepFun.Rd
===================================================================
--- pkg/man/tailDepFun.Rd 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/man/tailDepFun.Rd 2015-05-26 14:41:35 UTC (rev 144)
@@ -43,6 +43,7 @@
}
\examples{
+library("VineCopula")
data("simulatedTriples")
X <- rankTransform(triples[,c(1,3)])
Modified: pkg/tests/spCopulaTest.Rout.save
===================================================================
--- pkg/tests/spCopulaTest.Rout.save 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/tests/spCopulaTest.Rout.save 2015-05-26 14:41:35 UTC (rev 144)
@@ -1,6 +1,6 @@
-R version 3.1.1 (2014-07-10) -- "Sock it to Me"
-Copyright (C) 2014 The R Foundation for Statistical Computing
+R version 3.2.0 (2015-04-16) -- "Full of Ingredients"
+Copyright (C) 2015 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
@@ -17,7 +17,6 @@
> library("spcopula")
Loading required package: copula
-Loading required package: VineCopula
> data("spCopDemo")
> calcKTauPol <- fitCorFun(bins, degree=3)
@@ -63,4 +62,4 @@
>
> proc.time()
user system elapsed
- 6.92 0.17 7.19
+ 3.72 0.06 3.79
Modified: pkg/tests/stCopulaTest.Rout.save
===================================================================
--- pkg/tests/stCopulaTest.Rout.save 2015-05-25 16:10:31 UTC (rev 143)
+++ pkg/tests/stCopulaTest.Rout.save 2015-05-26 14:41:35 UTC (rev 144)
@@ -1,6 +1,6 @@
-R version 3.1.1 (2014-07-10) -- "Sock it to Me"
-Copyright (C) 2014 The R Foundation for Statistical Computing
+R version 3.2.0 (2015-04-16) -- "Full of Ingredients"
+Copyright (C) 2015 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
@@ -17,7 +17,6 @@
> library("spcopula")
Loading required package: copula
-Loading required package: VineCopula
> spCopT0 <- spCopula(components=list(claytonCopula(8), claytonCopula(4),
+ claytonCopula(2), claytonCopula(1),
+ claytonCopula(0.5), indepCopula()),
@@ -56,4 +55,4 @@
>
> proc.time()
user system elapsed
- 6.03 0.24 6.33
+ 3.08 0.10 3.19
More information about the spcopula-commits
mailing list