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