[Raster-commits] r106 - pkg/raster/R

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

Author: rhijmans
Date: 2009-01-08 08:01:56 +0100 (Thu, 08 Jan 2009)
New Revision: 106

Modified:
   pkg/raster/R/standard.generic.functions.R
Log:


Modified: pkg/raster/R/standard.generic.functions.R
===================================================================
--- pkg/raster/R/standard.generic.functions.R	2009-01-08 06:31:28 UTC (rev 105)
+++ pkg/raster/R/standard.generic.functions.R	2009-01-08 07:01:56 UTC (rev 106)
@@ -81,6 +81,13 @@
 	}
 )
 
+setMethod("Arith", signature(e1='numeric', e2='RasterLayer'),
+    function(e1, e2){ 
+		return(setRaster(e2, values=callGeneric(.getValues(e2), e1)))
+	}
+)
+
+
 setMethod("max", signature(x='RasterLayer'),
 	function(x, ..., na.rm=FALSE){
 		obs <- list(...)