Pessoal, Estou fazendo um gráfico no ggplot2() com o seguinte código: #———————————— # inicio do código #———————————— library(ggplot2) library(grid) mydf <- read.csv(file='http://dpaste.com/24KGSW9.txt', sep=',') head(mydf) g <- ggplot(data=mydf, aes( x=t.ano, y=nn.t.grupo, size=t.ttgrupo)) + geom_point(shape=21) + scale_size_area(max_size=12) + scale_x_continuous(limits=c(min(mydf[,'t.ano']), max(mydf[,'t.ano'])), breaks = seq(min(mydf[,'t.ano']), max(mydf[,'t.ano']),by=1)) + scale_y_continuous(limits=c(min(mydf[,'nn.t.grupo']), max(mydf[,'nn.t.grupo'])), breaks = seq(min(mydf[,'nn.t.grupo']), max(mydf[,'nn.t.grupo']),by=1)) + geom_segment( data=mydf, aes( x = xbeg, y = ybeg, xend = xend, yend = yend), arrow = arrow(length = unit(0.30,"cm"), type='closed'), size=0.5, color='black') + theme(legend.position='none') print(g) #———————————— # fim do código #———————————— O link do gráfico esta aqui. http://i.imgur.com/o0nyYzA.png <http://i.imgur.com/o0nyYzA.png> Eu preciso que as setas iniciem e parem nas bordas dos círculos, considerando o tamanho dos círculos depende da variável mydf$t.ttgrupo. Ou seja, eu teria que saber o raio dos círculos para desconta-los nas variáveis mydf$xbeg e mydf$xend. Alguma dica de como fazer isso? Att Roney