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() ##############