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

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

Author: jacobvanetten
Date: 2009-01-27 01:27:09 +0100 (Tue, 27 Jan 2009)
New Revision: 185

Modified:
   pkg/raster/R/adjacency.R
Log:
bug fix adjacency

Modified: pkg/raster/R/adjacency.R
===================================================================
--- pkg/raster/R/adjacency.R	2009-01-26 15:01:59 UTC (rev 184)
+++ pkg/raster/R/adjacency.R	2009-01-27 00:27:09 UTC (rev 185)
@@ -186,7 +186,7 @@
 		upperleftUnderFromToKnight <- .cs(fromCellUpperleftUnder, knight[c(4,6,8)])
 		upperrightLeftFromToKnight <- .cs(fromCellUpperrightLeft, knight[c(5,7,8)])
 		lowerleftUpFromToKnight <- .cs(fromCellLowerleftUp, knight[c(2,4,6)])
-		lowerrightUpFromToKnight <- .cs(fromCellLowerright, knight[c(1,3,5)])
+		lowerrightUpFromToKnight <- .cs(fromCellLowerrightUp, knight[c(1,3,5)])
 		upperleftRightFromToKnight <- .cs(fromCellUpperleftRight, knight[6:8])
 		upperrightUnderFromToKnight <- .cs(fromCellUpperrightUnder, knight[c(3,5,7)])
 		lowerleftRightFromToKnight <- .cs(fromCellLowerleftRight, knight[c(1,2,4)])