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

###############################################################

_______________________________________________
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.