require(raster)
## criando um raster 
r <- raster(ncol=20,nrow=20)
## atribuindo valores
r[] <- (1:ncell(r))*100
## linha, coluna, celula, valor
cbind(rowColFromCell(r,1:ncell(r)), 1:ncell(r),getValues(r))


2013/6/20 Elias Krainski <eliaskrainski@yahoo.com.br>
Oi Alex,

Veja este exemplo aplicado ao raster do exemplo da funcao citada.

  require(raster)
  example(rasterToPolygons)

  pol@data$i <- col(matrix(1L,36,18))[which(r@data@values>6)]
  pol@data$j <- row(matrix(1L,36,18))[which(r@data@values>6)]

  head(pol@data, 3)
  r[1, head(pol@data, 3)$j]

  tail(pol@data,3)
  r[18,   tail(pol@data,3)$j]


_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.



--
###############################################################
##  Jônatan Dupont Tatsch
##  Professor do Departamento de Física
##  Centro de Ciências Exatas e Naturais (CCNE)
##  Universidade Federal de Santa Maria
##  Faixa de Camobi, Prédio 13 - Campus UFSM - Santa Maria, RS, Brasil - 97105-900
##  Telefone: +55(55)33012084
##  www.ufsm.br/meteorologia
###############################################################