Muito obrigado Éder,
Sua solução ajudou bastante, pois agora não preciso ficar
usando a função anti_join() entre as coordenadas de valores com ou sem
referência,
--
======================================================================
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 8132-8112 (TIM) (+55) 65 9686-6970 (VIVO)
e-mails:[email protected]
[email protected]
Lattes:http://lattes.cnpq.br/1360403201088680
======================================================================
On 03/03/2015 10:32, Éder Comunello wrote:
Alexandre, olá novamente!
Acrescente no seu código.
### <code r>
### ...
allValues <- cbind(xyFromCell(r, 1:ncell(r)), as.data.frame(r)); allValues
allValues[cells,] ### valores referentes aos pontos
allValues[-cells,] ### valores sem ponto de referência
### </code>
Éder Comunello <c
<mailto:[email protected]>[email protected]
<mailto:[email protected]>>
Dourados, MS - [22 16.5'S, 54 49'W]
Em 17 de fevereiro de 2015 16:10, Tito Conte <[email protected]
<mailto:[email protected]>> escreveu:
Talvez ajude
valores=t(matrix(r$layer[,],10,10))
Tito Conte
Em 1 de fevereiro de 2015 23:48, ASANTOS
<[email protected]
<mailto:[email protected]>> escreveu:
Caros Listeiros,
Fiz a seleção da coordenada dos pixels (p.cen) em um
raster
que continham pontos de interesse (pontos) no CRM abaixo,
gostaria de
saber como impor uma condição para selecionar as coordenadas
dos pixels
que não contém nenhum ponto. Tentei criar um novo objeto com
todas as
coordenadas no raster e remover as coordenadas p.cen sem
sucesso, alguém
poderia me ajudar? Obrigado,
### <code r>
require(raster); require(sp)
## Criando um raster
r <- raster(nc=10, nr=10)
r <- setValues(r, round(runif(ncell(r))* 255))
##Pontos selecionados
x <- c(44.25,33.06,63.22,71.35)
y <- c(22.00,81.90,15.18,71.03)
pontos <- SpatialPoints(cbind(x,y))
cells <- cellFromXY(r, pontos); cells
coordinates(r)[cells,]
p.cen <- xyFromCell(r, cells); p.cen
plot(r)
points(pontos, col="red")
points(p.cen)
values <- extract(r,p.cen) ##Extrai as coordendas
dados<-cbind(p.cen,cells,values)
dados
### </code>
--
======================================================================
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 8132-8112 <tel:%28%2B55%29%2065%208132-8112>
(TIM) (+55) 65 9686-6970 <tel:%28%2B55%29%2065%209686-6970> (VIVO)
e-mails:[email protected]
<mailto:e-mails%[email protected]>
[email protected]
<mailto:[email protected]>
Lattes: http://lattes.cnpq.br/1360403201088680
======================================================================
---
Este email foi escaneado pelo Avast antivírus.
http://www.avast.com
_______________________________________________
R-br mailing list
[email protected] <mailto:[email protected]>
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.
_______________________________________________
R-br mailing list
[email protected] <mailto:[email protected]>
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.
_______________________________________________
R-br mailing list
[email protected]
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.
--
======================================================================
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 8132-8112 (TIM) (+55) 65 9686-6970 (VIVO)
e-mails:[email protected]
[email protected]
Lattes:http://lattes.cnpq.br/1360403201088680
======================================================================
---
Este email foi escaneado pelo Avast antivírus.
http://www.avast.com
_______________________________________________
R-br mailing list
[email protected]
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.
