我怎样才能在这个散点图标注点?(How can I label points in this sca

2019-07-03 13:45发布

你能不能帮我把标签贴在下面的图表?

我使用的代码是:

valbanks<-scan("banks.txt", what=list(0,0,""), sep="", skip=1, comment.char="#")
valbanks

valj2007<-valbanks[[1]]
valj2009<-valbanks[[2]]
namebank<-valbanks[[3]]

percent_losses<-(valj2009-valj2007)/valj2007
percent_losses

abs_losses<-(valj2007-valj2009)
abs_losses

plot(abs_losses, percent_losses,main="Absolute Losses vs. Relative Losses(in%)",xlab="Losses (absolute, in miles of millions)",ylab="Losses relative (in % of January´2007 value",col="blue", pch = 19, cex = 1, lty = "solid", lwd = 2,text(percet_losses, abs_losses,namebank))

text(percet_losses, abs_losses,labels=namebank, cex= 0.7, offset = 10)

并且数据是:

Value_Jan_2007  Value_Jan_2009  Bank    #
49  16  Morgan_Stanley
120 4.6 RBS
76  10.3    Deutsche_Bank
67  17  Credit_Agricole
80  26  Societé_Generale
91  7.4 Barclays
108 32.5    BNP-Paribas
93  26  Unicredit
116 35  UBS
75 27   Credit_Suise
100 35  Goldman_Sachs
116 64  Santander
255 19  Citigroup
165 85  JP_Morgan
215 97  HSBC

非常感谢你

什么是把标签底部,右,上,左的选项,...?

总结:我希望有一个曲线图类似的是,一个是从第二个消息在这个帖子 ,但没有出现的代码。

我有什么样的代码把?


如果我把text(percet_losses, abs_losses,namebank)我得到什么:图形继续没有变化。

你能告诉我,我需要把代码?

谢谢

Answer 1:

你调用text()不输出任何东西,因为你倒你的X和你Y:

plot(abs_losses, percent_losses, 
     main= "Absolute Losses vs. Relative Losses(in%)",
     xlab= "Losses (absolute, in miles of millions)",
     ylab= "Losses relative (in % of January´2007 value)",
     col= "blue", pch = 19, cex = 1, lty = "solid", lwd = 2)

text(abs_losses, percent_losses, labels=namebank, cex= 0.7)

现在,如果你想向下移动你的标签,左,上,右,您可以添加参数pos=与值,分别为1,2,3或4。例如,把你的标签了:

 text(abs_losses, percent_losses, labels=namebank, cex= 0.7, pos=3)

当然你也可以给出价值的载体, pos如果你想要在其他方向上的标签(例如用于Goldman_Sachs,瑞银集团和Société_Generale因为它们与其他标签重叠):

 pos_vector <- rep(3, length(namebank))
 pos_vector[namebank %in% c("Goldman_Sachs", "Societé_Generale", "UBS")] <- 4
 text(abs_losses, percent_losses, labels=namebank, cex= 0.7, pos=pos_vector)



Answer 2:

对于刚刚绘制矢量,你应该使用下面的命令:

text(your.vector, labels=your.labels, cex= labels.size, pos=labels.position)


Answer 3:

我曾尝试directlabels包把文本标签。 在散点图的情况下,它仍不完美,但比手动调节的位置,特别是在你准备的地块草案,不是最终的一个案件要好得多 - 所以你需要一次又一次的改变,使情节 - 。



Answer 4:

您应该使用标签属性中绘图功能和该属性的值应该是包含要为每个点有值的向量。



文章来源: How can I label points in this scatterplot?