这篇文章主要为大家展示了“如何使用Vennerable绘图”,内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下“如何使用Vennerable绘图”这篇文章吧。
利用Vennerable可以进行绘图,以包自带的数据绘图如下: library(Vennerable)data(StemCell)w <- Venn(Sets=StemCell[1:2])plot(w, type="squares") 组别标签位置进行调整 可以基于Venn...
利用Vennerable可以进行绘图,以包自带的数据绘图如下:
library(Vennerable) data(StemCell) w <- Venn(Sets=StemCell[1:2]) plot(w, type="squares")
组别标签位置进行调整 可以基于VennGetSetLabels 和VennSetSetLabels 进行,前者获取当前绘图对象的Set标签的位置,进行修改后,利用后者整合到绘图对象中,重新绘图
获取组别标签的位置信息:
w <- compute.Venn(Venn(Sets=StemCell[1:2]), type ="squares") SetLabels=VennGetSetLabels(w) print(SetLabels)
信息如下:
> print(SetLabels) Label x y hjust vjust 1 OCT4 -19.56779 12.47998 left bottom 2 SOX2 24.96936 17.88155 right bottom
修改位置信息并重新绘图
#SetLabels$y=SetLabels$y*1.05 SetLabels$x=SetLabels$x*1.2 w=VennSetSetLabels(w,SetLabels) library(grid) grid.newpage() plot(w)
以上是“如何使用Vennerable绘图”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注亿速云行业资讯频道!
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。