如果重叠,这是我的数据和代码geom_text_repel
:
player2 fgper pts mp
1 Dan Dickau 39.34739 5.816667 15.393333
2 Danny Ainge 45.64634 12.305895 28.008899
3 Daniel Ewing 37.89910 3.255639 12.684211
4 Dante Cunningham 45.50715 5.965135 21.207607
5 Joe Alexander 36.99286 4.208955 11.119403
6 Jordan Crawford 29.15000 4.500000 11.500000
7 Joe Crispin 36.71111 3.761905 7.428571
8 Joe Dumars 44.50372 16.064602 34.723009
9 Joe Binion 43.75000 1.272727 4.636364
10 Joe Courtney 45.71220 2.750000 7.802083
ggplot(data=data_agg,aes(x=pts,y=fgper,color=mp)) + geom_point() +
geom_text_repel(aes(label = player_dum),segment.colour = NA,box.padding = 0.2) +
theme(legend.key.height = unit(2.5,"cm")) + scale_color_gradientn(colors=rainbow(4))
问题在于Patrick Ewing实际上是关键点(20,50),那么它的位置远远不是所谓的标记点。
但是,包ggrepel
显示的示例可以绘制如下图:
它的代码是:
p <- ggplot(mtcars,
aes(wt, mpg, colour = factor(cyl))) +
geom_point()
p + geom_text_repel(aes(label=rownames(mtcars)))
它似乎与我的不同,所以我应该做些什么来使标签靠近点本身,至少看到知道标签指示附近点的人。
任何想法都会有所帮助!