搜索
人大经济论坛 › 附件下载

附件下载

所在主题：
文件名:  s2.zip
资料下载链接地址: https://bbs.pinggu.org/a-3110661.html
本附件包括：
  • s2.csv
附件大小:
306 Bytes   举报本内容

如图所示，size太小，没有办法做好处理。另外有些点因为size过于小，导致标签无法显示。
其次就是主体不够美观。
  1. library(ggrepel)
  2. set.seed(1234)
  3. jdata<-read.csv("s2.csv",header=T)
  4. jdata$TF<-factor(jdata$TF,levels = c(0,1),labels = c("降低","提升"))
  5. library(ggplot2)
  6. ggplot(jdata, aes(x=mar, y=may,colour=TF,size=abs)) +
  7. geom_point()+
  8. scale_x_continuous(limits = c(0,10.5)) +
  9. scale_y_continuous(limits = c(0,10.5)) +
  10. geom_text_repel(aes(mar, may, label=name))+
  11. geom_abline(slope=1) +
  12. labs(title="children get paid by partime job",x="mar（10$)", y = "may（10$）")+
  13. scale_colour_hue( name = "相比增幅", labels = c("降低", "提升"))+
  14. scale_size(name="较3月变化")+
  15. theme_classic()
复制代码


    熟悉论坛请点击新手指南
下载说明
1、论坛支持迅雷和网际快车等p2p多线程软件下载，请在上面选择下载通道单击右健下载即可。
2、论坛会定期自动批量更新下载地址,所以请不要浪费时间盗链论坛资源,盗链地址会很快失效。
3、本站为非盈利性质的学术交流网站,鼓励和保护原创作品，拒绝未经版权人许可的上传行为。本站如接到版权人发出的合格侵权通知，将积极的采取必要措施；同时，本站也将在技术手段和能力范围内，履行版权保护的注意义务。
(如有侵权，欢迎举报)
二维码

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

京ICP备16021002号-2 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问：王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2026-2-8 04:54