如何使用Vennerable绘图

这篇文章主要为大家展示了“如何使用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绘图”这篇文章的所有内容，感谢各位的阅读！相信大家都有了一定的了解，希望分享的内容对大家有所帮助，如果还想学习更多知识，欢迎关注亿速云行业资讯频道！