Muito obrigado Jônatan, ajudou muito!!!
--
==
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:
Obrigado Jônatan,
Desculpe se não fui claro na minha pergunta , mas a função
sugerida xyFromCell(r, df$cel):
x y
[1,] -162 -81
Retorna apenas a coordenada do pixel V1 = 61, gostaria de
extrair a coordenada do centro de todos os pixels de V1 a V10
x y cel
p.cen <- as.data.frame(xyFromCell(r, df$cel))
names(p.cen) <- c("xc", "yc")
df <- data.frame(df, p.cen)
df
#dput(df)
#structure(list(x = -150, y = -80, cel = 91, col = 1L, row = 10, V1 = 61,
V2 = 15, xc = -162, yc = -81), .Names = c("x", "y", "cel", "col", "row",
"V1", "V2", "xc", "yc"), row.names
Obrigado Jônatan,
Perfeita essa função usando getValuesBlocke consegui fazer a
extração de 10 valores na horizontal à partir de uma coordenada
arbitrária como xy(-150,80), porém não consigo agora capturar além dos
valores dos pixel a coordenada central desses pixel pelo output dado
Trocando a ordem para ficar como eu queria (na primeira imagem):
library(Matrix)
library(latticeExtra)
library(gridExtra)
m1 <- sparseMatrix(i = c(1, 1, 2, 3, 4, 4, 4, 5),
j = c(3, 4, 4, 1, 2, 3, 5, 4),
x = 1:8)
m2 <- m1/2
p1 <- image(m1) +
consegui mexendo no panel da levelplot.
Sua solucao é muuuito mais facil :)
Valeu!
On 03/02/2017 12:20, Walmes Zeviani wrote:
Faça o panel.text() antes. Veja CMR.
library(Matrix)
library(latticeExtra)
library(gridExtra)
m1 <- sparseMatrix(i = c(1, 1, 2, 3, 4, 4, 4, 5),
j
Faça o panel.text() antes. Veja CMR.
library(Matrix)
library(latticeExtra)
library(gridExtra)
m1 <- sparseMatrix(i = c(1, 1, 2, 3, 4, 4, 4, 5),
j = c(3, 4, 4, 1, 2, 3, 5, 4),
x = 1:8)
m2 <- m1/2
p <- image(m2) +
layer(panel.text(x = 3,
Em inglês, tem os livros do Zuur.
http://www.highstat.com/book1.htm
http://www.highstat.com/BGGAM.htm
Tem bastante exemplos práticos, e o autor explica muito bem para um público
completamente leigo. Mas são voltados para análise de dados em biologia.
Em 2 de fevereiro de 2017 19:59, Fernando
Se tenho
library(Matrix)
library(lattice)
library(gridExtra)
m1 = sparseMatrix(i=c(1,1,2,3,4,4,4,5), j=c(3,4,4,1,2,3,5,4), x=1:8)
m2=m1/2
grid.arrange(image(m1), image(m2), ncol=2)
Como faco para panel.text() funcionar no plot da esquerda?
Elias
___
Use a função smartbind da library(gtools).
Ronaldo C??mara de Ara??jo
[https://mail.google.com/mail/?ui=2=a38f3a957b=att=1335ff14b71079d6=0.1=thd=1384292897560461312-1]
De: R-br em nome de Delcio Rudinei
Bortolanza via
10 matches
Mail list logo