[R-br] Selecionar a extração de valores dos pixels em linhas a cada número de pixels arbitrário

[ASANTOS]

Prezados Membros,

     Tenho um raster hipotético r:

require(raster); require(sp)

## Criando um raster
r <- raster(nc=10, nr=10)
r <- setValues(r, round(runif(ncell(r))* 255))

      Consigo extrair os valores dos pixels de interesse dadas as 
coordenadas centrais dos mesmos:

x     <- c(54,18,54,54)
y     <- c(27,81,9,63)

pontos <- SpatialPoints(cbind(x,y))

cells <- cellFromXY(r, pontos); cells
p.cen <- xyFromCell(r, cells); p.cen

values <- extract(r,p.cen)
dados<-cbind(p.cen,cells,values)

         No entanto, eu gostaria de encontrar um modo para extrair o 
valor dos pixels, no qual, eu selecionaria uma coordenada e a função 
realizaria a extração dos pixels de linhas verticais inteiras do raster 
a cada dois pixels à partir da coordenada dada, por exemplo?

Alguém poderia me dar uma ideia de como chegar a esse resultado?

Obrigado,

-- 
======================================================================
Alexandre dos Santos
Proteção Florestal
IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso
Campus Cáceres
Caixa Postal 244
Avenida dos Ramires, s/n
Bairro: Distrito Industrial
Cáceres - MT                      CEP: 78.200-000
Fone: (+55) 65 99686-6970 (VIVO) (+55) 65 3221-2674 (FIXO)
e-mails:alexandresantosbr em yahoo.com.br
         alexandre.santos em cas.ifmt.edu.br
Lattes: http://lattes.cnpq.br/1360403201088680
OrcID: orcid.org/0000-0001-8232-6722   -   ResearcherID: A-5790-2016
Researchgate: www.researchgate.net/profile/Alexandre_Santos10
LinkedIn: br.linkedin.com/in/alexandre-dos-santos-87961635
Mendeley:www.mendeley.com/profiles/alexandre-dos-santos6/
======================================================================