[spcopula-commits] r109 - / pkg pkg/R

[noreply at r-forge.r-project.org]

Author: ben_graeler
Date: 2013-09-18 15:13:11 +0200 (Wed, 18 Sep 2013)
New Revision: 109

Removed:
   spcopula_0.1-1.tar.gz
   spcopula_0.1-1.zip
Modified:
   /
   pkg/DESCRIPTION
   pkg/R/spatialPreparation.R
Log:
- corrected small bug in [[ for neighbourhood


Property changes on: 
___________________________________________________________________
Modified: svn:ignore
   - spcopula_1.0.48.tar.gz
spcopula_1.0.48.zip
.Rd2pdf6724
.Rhistory
.Rproj.user
spcopula.Rcheck
spcopula.Rproj
spcopula_1.0.66.tar.gz
Meuse_spcopula_estimation.R
man
pkg.Rcheck
pkg.pdf

   + .Rd2pdf6724
.Rhistory
.Rproj.user
Meuse_spcopula_estimation.R
pkg.Rcheck
pkg.pdf
spcopula.Rcheck
spcopula.Rproj


Modified: pkg/DESCRIPTION
===================================================================
--- pkg/DESCRIPTION	2013-09-09 08:58:05 UTC (rev 108)
+++ pkg/DESCRIPTION	2013-09-18 13:13:11 UTC (rev 109)
@@ -2,7 +2,7 @@
 Type: Package
 Title: copula driven spatial analysis
 Version: 0.1-1
-Date: 2013-07-23
+Date: 2013-09-18
 Authors at R: c(person("Benedikt", "Graeler", role = c("aut", "cre"), email =
         "ben.graeler at uni-muenster.de"), person("Marius", "Appel",
         role = "ctb"))
@@ -10,7 +10,7 @@
 Description: This package provides a framework to analyse via copulas spatial and spatio-temporal data provided in the format of the spacetime package. Additionally, support for calculating different multivariate return periods is implemented.
 License: GPL-2
 LazyLoad: yes
-Depends: copula (>= 0.999-7), VineCopula (>= 1.1-1), methods, R (>= 2.15.0)
+Depends: copula (>= 0.999-7), VineCopula (>= 1.1-2), methods, R (>= 2.15.0)
 Imports: sp, spacetime (>= 1.0-2)
 URL: http://r-forge.r-project.org/projects/spcopula/
 Collate:

Modified: pkg/R/spatialPreparation.R
===================================================================
--- pkg/R/spatialPreparation.R	2013-09-09 08:58:05 UTC (rev 108)
+++ pkg/R/spatialPreparation.R	2013-09-18 13:13:11 UTC (rev 109)
@@ -43,7 +43,7 @@
 setMethod(spplot, signature("neighbourhood"), spplotNeighbourhood)
 
 selectFromNeighbourhood <- function(x, i) {
-  newSp <- x at locations[i,]
+  newSp <- x at dataLocs[i,]
   new("neighbourhood", data=x at data[i,,drop=F], 
       distances=x at distances[i,,drop=F], 
       dataLocs=newSp, predLocs=x at predLocs, bbox=newSp at bbox, 

Deleted: spcopula_0.1-1.tar.gz
===================================================================
(Binary files differ)

Deleted: spcopula_0.1-1.zip
===================================================================
(Binary files differ)