全部版块 我的主页
论坛 数据科学与人工智能 数据分析与数据科学 R语言论坛
2848 7
2020-03-31
大家好,如题,ggplot2绘图,图例无法改变位置,加与不加 theme(legend.position='top'),结果都一样,求高手指点,多谢!所需数据文件与代码都在网盘里。

链接: https://pan.baidu.com/s/1fZ7sF6ZkYXU3eW4TBXu9xA 提取码: 8fpk

主要问题是图例位置问题,想加到条形图右上角
还有次要问题,希望能一并解释一些,多谢!
1.BP <- read.table('BP.txt', sep='\t', header=T)    # Error 不知为何无法读入,而同一网站获得的其他文件正常读入。
2.数据框中不允许用这种方法(主要是有-)go_enrich_df$-log10_PValue新建名为-log10_PValue的变量吗?
3.ggplot(data=go_enrich_df, aes(x=term_order, y= go_enrich_df[, '-log10_PValue'], fill=type)) +  ...
开始是写的y= -log10_PValue, 提示找不到对象'log10_PValue',为何?
4.左下角文字溢出,如何使图像整体右移?
legend.rar
大小:(67.38 KB)

 马上下载

本附件包括:

  • BP.xlsx
  • KEGG.txt
  • MF.txt
  • CC.txt
  • plot.rich6.R
  • enrichment_of_miRNA_targets7.pdf
  • BP.txt






enrichment_of_miRNA_targets7.bmp
二维码

扫码加我 拉你入群

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

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

全部回复
2020-4-1 11:43:33
+ guides(fill = guide_legend(direction="horizontal",label.position = "top", label.hjust = 1))
试试这个,不过ggplot2只有四个位置选项,放不到右上角
二维码

扫码加我 拉你入群

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

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

2020-4-1 20:59:35
llb_321 发表于 2020-4-1 11:43
+ guides(fill = guide_legend(direction="horizontal",label.position = "top", label.hjust = 1))
试试这 ...
多谢朋友指点,不过貌似不成功啊,我加上您这条命令后是这样的结果,见图,图例在右面您运行后是什么效果啊?或者您还别的建议吗?多谢!

Rplot01.png


FastStoneEditor1.png
二维码

扫码加我 拉你入群

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

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

2020-4-2 10:16:43
您的代码中 有theme legeng.position="none" 可能与这个有关 删掉试试
二维码

扫码加我 拉你入群

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

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

2020-4-2 11:19:46
复制代码
二维码

扫码加我 拉你入群

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

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

2020-4-2 15:15:41
llb_321 发表于 2020-4-2 10:16
您的代码中 有theme legeng.position="none" 可能与这个有关 删掉试试
也试过了,还是不行。楼下zhou1_20朋友完美解决问题。仍然感谢您的耐心解答,多谢!
二维码

扫码加我 拉你入群

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

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

点击查看更多内容…
栏目导航
热门文章
推荐文章

说点什么

分享

扫码加好友,拉您进群
各岗位、行业、专业交流群