Daniel KinparaSeptember 2015
Gx <- c(-1, -2, -1, 0, 0, 0, 1, 2, 1) Gy <- c(1, 0, -1, 2, 0, -2, 1, 0, -1) effect <- convolve(Gx, Gy, type = "filter") round(effect)
[1] 0