我怎样才能在这个散点图标记点?

你能帮我把标签放在下面的图表上吗?

http://img849.imageshack.us/img849/7594/snap1034.png

我使用的代码是:

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 

非常感谢你

将标签放在底部,右侧,上部,左侧,…的选项是什么?

总结:我想要一个类似于这个post中的第二个消息的图表,但是那里没有代码。

我必须放什么代码?


如果我把text(percet_losses, abs_losses,namebank) ,我什么也得不到:图表继续不变。

你能告诉我我需要放的代码吗?

谢谢

你对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) 

在这里输入图像说明

如果你想要其他方向的某些标签(例如Goldman_Sachs,UBS和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) 

在这里输入图像说明

我已经尝试了用于放置文本标签的直接标签包。 在散点图的情况下,它不是完美的,但比手动调整位置要好得多,特别是在你准备草图的情况下,而不是最后一个 – 所以你需要改变并且一次又一次地绘制。

为了绘制一个vector,你应该使用下面的命令:

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

您应该在plot函数内使用labels属性,并且此属性的值应该是包含您希望每个点具有的值的向量。