olá,

Preciso obter as coordenadas de pontos e, condicionalmente a estas
coordenadas, traçar novos graficos de forma interativa.

"locator()" não serve pq fica congelado até escolher todos pontos.
Quero que a cada 'click', gere um novo grafico.

Tentei adaptar os exemplos da função "getGraphicsEvent()"
mas ainda não entendi o funcionamento direito.

Gostaria de que fosse retornado as coordenadas de onde o usuario dar o 'click'...

Abaixo segue o que tentei fazer.

Agradeço antecipadamente a aquem tentar ajudar
Grato.

Cleber

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

plot( cbind(1:3,1), cex=2 )

mousedown <- function( buttons, x, y ){
x <- grconvertX(x, 'dev', 'user')
y <- grconvertY(y, 'dev', 'user')
r <- c( x,y  )
return( r )
}

setGraphicsEventHandlers(prompt="Click and drag, hit q to quit", onMouseDown = mousedown )

getGraphicsEvent()

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


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

Responder a