GOplot作图

Tiaoxiaobai

已于 2024-12-12 15:05:34 修改

阅读量303

点赞数 1

分类专栏： R语言可视化遇到问题文章标签：笔记 r语言

于 2024-12-11 19:00:00 首次发布

本文链接：https://blog.csdn.net/Tiaoxiaobai/article/details/144367392

版权

R语言可视化遇到问题专栏收录该内容

5 篇文章

订阅专栏

这两天没啥项目，不太忙，整理一下之前客户要求的作图脚本留作一记录！

客户要求图如下

看了GOplot官网可以实现这个，虽然我是在线网站做的，具体代码如下

library(GOplot)
data(EC)

# 假设已经运行了以下命令以获得 'circ' 对象
# circ <- circle_dat(EC$david, EC$genelist)

IDs <- c('GO:0007507', 'GO:0001568', 'GO:0001944', 'GO:0048729', 'GO:0048514', 'GO:0005886', 'GO:0008092', 'GO:0008047')

# 打开一个新的PNG图形设备
png(filename = "GOCircle_plot.png", width = 2600, height = 1000, units = "px", res = 300)

# 绘制GOCircle图
GOCircle(circ, nsub = IDs,
         rad1 = 2, 
         rad2 = 3,
         table.legend = TRUE,
         zsc.col = c('darkgoldenrod1', 'black', 'cyan1'),
         lfc.col = c("#F39B7FFF","#4DBBD5FF"),
         label.size = 5,
         label.fontface = "bold")

# 关闭图形设备，确保图像被保存
dev.off()

出图结果如下，还有待改进，但是GOplot函数没有提供更多的参数进行处理，后续再看看其详细函数，先记录一下