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