2190.html 43 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630
  1. <!DOCTYPE html>
  2. <html lang="en" data-default-color-scheme=auto>
  3. <head><!-- hexo injector head_begin start -->
  4. <script async src="https://analytics.umami.is/script.js" data-website-id="e59ec28a-c9a7-4104-9e62-a9f7eb3fac0b"></script>
  5. <!-- hexo injector head_begin end -->
  6. <meta charset="UTF-8">
  7. <link rel="apple-touch-icon" sizes="76x76" href="https://img.limour.top/2023/08/29/64ee07361815a.webp">
  8. <link rel="icon" href="https://img.limour.top/2023/08/29/64ee07361815a.webp">
  9. <meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=5.0, shrink-to-fit=no">
  10. <meta http-equiv="x-ua-compatible" content="ie=edge">
  11. <meta name="theme-color" content="#2f4154">
  12. <meta name="author" content="Limour">
  13. <meta name="keywords" content="">
  14. <meta name="description" content="clusterProfiler:自定义数据库中展示过构建HALLMARKS的方式,但是速度有点慢,这里简单改动一下,对C5_HPO进行构建。 构建12345678910111213text &lt;- readLines(&quot;c5.hpo.v7.5.1.symbols.gmt&quot;, encoding &#x3D; &quot;UTF-8&quot;)text &lt;- strsplit(t">
  15. <meta property="og:type" content="article">
  16. <meta property="og:title" content="clusterProfiler:构建MsigDB的数据库">
  17. <meta property="og:url" content="https://occdn.limour.top/2190.html">
  18. <meta property="og:site_name" content="Limour&#39;s Blog">
  19. <meta property="og:description" content="clusterProfiler:自定义数据库中展示过构建HALLMARKS的方式,但是速度有点慢,这里简单改动一下,对C5_HPO进行构建。 构建12345678910111213text &lt;- readLines(&quot;c5.hpo.v7.5.1.symbols.gmt&quot;, encoding &#x3D; &quot;UTF-8&quot;)text &lt;- strsplit(t">
  20. <meta property="og:locale" content="en_US">
  21. <meta property="article:published_time" content="2022-08-07T09:44:47.000Z">
  22. <meta property="article:modified_time" content="2023-09-01T13:28:03.333Z">
  23. <meta property="article:author" content="Limour">
  24. <meta name="twitter:card" content="summary_large_image">
  25. <title>clusterProfiler:构建MsigDB的数据库 - Limour&#39;s Blog</title>
  26. <link rel="stylesheet" href="https://jscdn.limour.top/npm/bootstrap@4.6.1/dist/css/bootstrap.min.css" />
  27. <link rel="stylesheet" href="https://jscdn.limour.top/npm/github-markdown-css@4.0.0/github-markdown.min.css" />
  28. <link rel="stylesheet" href="https://jscdn.limour.top/npm/hint.css@2.7.0/hint.min.css" />
  29. <link rel="stylesheet" href="https://lib.baomitu.com/fancybox/3.5.7/jquery.fancybox.min.css" />
  30. <!-- 主题依赖的图标库,不要自行修改 -->
  31. <!-- Do not modify the link that theme dependent icons -->
  32. <link rel="stylesheet" href="//at.alicdn.com/t/font_1749284_hj8rtnfg7um.css">
  33. <link rel="stylesheet" href="//at.alicdn.com/t/font_1736178_lbnruvf0jn.css">
  34. <link rel="stylesheet" href="/css/main.css" />
  35. <link id="highlight-css" rel="stylesheet" href="/css/highlight.css" />
  36. <link id="highlight-css-dark" rel="stylesheet" href="/css/highlight-dark.css" />
  37. <link rel="stylesheet" href="/theme-inject/custom.css">
  38. <script id="fluid-configs">
  39. var Fluid = window.Fluid || {};
  40. Fluid.ctx = Object.assign({}, Fluid.ctx)
  41. var CONFIG = {"hostname":"occdn.limour.top","root":"/","version":"1.9.5-a","typing":{"enable":true,"typeSpeed":70,"cursorChar":"_","loop":false,"scope":[]},"anchorjs":{"enable":true,"element":"h1,h2,h3,h4,h5,h6","placement":"left","visible":"hover","icon":"§"},"progressbar":{"enable":true,"height_px":3,"color":"#29d","options":{"showSpinner":false,"trickleSpeed":100}},"code_language":{"enable":true,"default":"TEXT"},"copy_btn":true,"image_caption":{"enable":true},"image_zoom":{"enable":true,"img_url_replace":["",""]},"toc":{"enable":true,"placement":"right","headingSelector":"h1,h2,h3,h4,h5,h6","collapseDepth":0},"lazyload":{"enable":true,"loading_img":"https://jscdn.limour.top/gh/Limour-dev/Sakurairo_Vision/load_svg/inload.svg","onlypost":false,"offset_factor":2},"web_analytics":{"enable":false,"follow_dnt":true,"baidu":null,"google":{"measurement_id":null},"tencent":{"sid":null,"cid":null},"woyaola":null,"cnzz":null,"leancloud":{"app_id":null,"app_key":null,"server_url":null,"path":"window.location.pathname","ignore_local":false}},"search_path":"/local-search.xml","include_content_in_search":true};
  42. if (CONFIG.web_analytics.follow_dnt) {
  43. var dntVal = navigator.doNotTrack || window.doNotTrack || navigator.msDoNotTrack;
  44. Fluid.ctx.dnt = dntVal && (dntVal.startsWith('1') || dntVal.startsWith('yes') || dntVal.startsWith('on'));
  45. }
  46. </script>
  47. <script src="/js/utils.js" ></script>
  48. <script src="/js/color-schema.js" ></script>
  49. <meta name="generator" content="Hexo 6.3.0"></head>
  50. <body>
  51. <header>
  52. <div class="header-inner" style="height: 70vh;">
  53. <nav id="navbar" class="navbar fixed-top navbar-expand-lg navbar-dark scrolling-navbar">
  54. <div class="container">
  55. <a class="navbar-brand" href="/">
  56. <strong>Limour&#39;s Blog</strong>
  57. </a>
  58. <button id="navbar-toggler-btn" class="navbar-toggler" type="button" data-toggle="collapse"
  59. data-target="#navbarSupportedContent"
  60. aria-controls="navbarSupportedContent" aria-expanded="false" aria-label="Toggle navigation">
  61. <div class="animated-icon"><span></span><span></span><span></span></div>
  62. </button>
  63. <!-- Collapsible content -->
  64. <div class="collapse navbar-collapse" id="navbarSupportedContent">
  65. <ul class="navbar-nav ml-auto text-center">
  66. <li class="nav-item">
  67. <a class="nav-link" href="/">
  68. <i class="iconfont icon-home-fill"></i>
  69. <span>Home</span>
  70. </a>
  71. </li>
  72. <li class="nav-item">
  73. <a class="nav-link" href="/archives/">
  74. <i class="iconfont icon-archive-fill"></i>
  75. <span>Archives</span>
  76. </a>
  77. </li>
  78. <li class="nav-item" id="search-btn">
  79. <a class="nav-link" target="_self" href="javascript:;" data-toggle="modal" data-target="#modalSearch" aria-label="Search">
  80. <i class="iconfont icon-search"></i>
  81. </a>
  82. </li>
  83. <li class="nav-item" id="color-toggle-btn">
  84. <a class="nav-link" target="_self" href="javascript:;" aria-label="Color Toggle">
  85. <i class="iconfont icon-dark" id="color-toggle-icon"></i>
  86. </a>
  87. </li>
  88. </ul>
  89. </div>
  90. </div>
  91. </nav>
  92. <div id="banner" class="banner" parallax=true
  93. style="background: url('https://img.limour.top/2023/08/29/64ee08e108638.webp') no-repeat center center; background-size: cover;">
  94. <div class="full-bg-img">
  95. <div class="mask flex-center" style="background-color: rgba(0, 0, 0, 0.3)">
  96. <div class="banner-text text-center fade-in-up">
  97. <div class="h2">
  98. <span id="subtitle" data-typed-text="clusterProfiler:构建MsigDB的数据库"></span>
  99. </div>
  100. <div class="mt-3">
  101. <span class="post-meta">
  102. <i class="iconfont icon-date-fill" aria-hidden="true"></i>
  103. <time datetime="2022-08-07 17:44" pubdate>
  104. August 7, 2022 pm
  105. </time>
  106. </span>
  107. </div>
  108. <div class="mt-1">
  109. <span class="post-meta mr-2">
  110. <i class="iconfont icon-chart"></i>
  111. 3k words
  112. </span>
  113. <span class="post-meta mr-2">
  114. <i class="iconfont icon-clock-fill"></i>
  115. 26 mins
  116. </span>
  117. </div>
  118. </div>
  119. </div>
  120. </div>
  121. </div>
  122. </div>
  123. </header>
  124. <main>
  125. <div class="container-fluid nopadding-x">
  126. <div class="row nomargin-x">
  127. <div class="side-col d-none d-lg-block col-lg-2">
  128. </div>
  129. <div class="col-lg-8 nopadding-x-md">
  130. <div class="container nopadding-x-md" id="board-ctn">
  131. <div id="board">
  132. <article class="post-content mx-auto">
  133. <h1 id="seo-header">clusterProfiler:构建MsigDB的数据库</h1>
  134. <div class="markdown-body">
  135. <p><a href="https://occdn.limour.top/2128.html">clusterProfiler:自定义数据库</a>中展示过构建<a target="_blank" rel="noopener" href="http://www.gsea-msigdb.org/gsea/downloads.jsp">HALLMARKS</a>的方式,但是速度有点慢,这里简单改动一下,对<a target="_blank" rel="noopener" href="https://www.gsea-msigdb.org/gsea/msigdb/collections.jsp#C5">C5_HPO</a>进行构建。</p>
  136. <h2 id="构建"><a href="#构建" class="headerlink" title="构建"></a>构建</h2><figure class="highlight r"><table><tr><td class="gutter"><pre><span class="line">1</span><br><span class="line">2</span><br><span class="line">3</span><br><span class="line">4</span><br><span class="line">5</span><br><span class="line">6</span><br><span class="line">7</span><br><span class="line">8</span><br><span class="line">9</span><br><span class="line">10</span><br><span class="line">11</span><br><span class="line">12</span><br><span class="line">13</span><br></pre></td><td class="code"><pre><code class="hljs R">text <span class="hljs-operator">&lt;-</span> readLines<span class="hljs-punctuation">(</span><span class="hljs-string">&quot;c5.hpo.v7.5.1.symbols.gmt&quot;</span><span class="hljs-punctuation">,</span> encoding <span class="hljs-operator">=</span> <span class="hljs-string">&quot;UTF-8&quot;</span><span class="hljs-punctuation">)</span><br>text <span class="hljs-operator">&lt;-</span> strsplit<span class="hljs-punctuation">(</span>text<span class="hljs-punctuation">,</span> <span class="hljs-string">&quot;\t&quot;</span><span class="hljs-punctuation">)</span><br>H.ALL <span class="hljs-operator">&lt;-</span> <span class="hljs-built_in">list</span><span class="hljs-punctuation">(</span>TERM2GENE<span class="hljs-operator">=</span>data.frame<span class="hljs-punctuation">(</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">,</span> TERM2NAME<span class="hljs-operator">=</span>data.frame<span class="hljs-punctuation">(</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><br><span class="hljs-keyword">for</span> <span class="hljs-punctuation">(</span>i <span class="hljs-keyword">in</span> <span class="hljs-number">1</span><span class="hljs-operator">:</span><span class="hljs-built_in">length</span><span class="hljs-punctuation">(</span>text<span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">&#123;</span><br> line <span class="hljs-operator">&lt;-</span> text<span class="hljs-punctuation">[[</span>i<span class="hljs-punctuation">]</span><span class="hljs-punctuation">]</span><br> gsid <span class="hljs-operator">&lt;-</span> line<span class="hljs-punctuation">[</span><span class="hljs-number">1</span><span class="hljs-punctuation">]</span><br> H.ALL<span class="hljs-operator">$</span>TERM2NAME <span class="hljs-operator">&lt;-</span> rbind<span class="hljs-punctuation">(</span>H.ALL<span class="hljs-operator">$</span>TERM2NAME<span class="hljs-punctuation">,</span> <span class="hljs-built_in">c</span><span class="hljs-punctuation">(</span>i<span class="hljs-punctuation">,</span>gsid<span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><br> lc_gsid <span class="hljs-operator">&lt;-</span> <span class="hljs-built_in">rep</span><span class="hljs-punctuation">(</span>x <span class="hljs-operator">=</span> i<span class="hljs-punctuation">,</span> times <span class="hljs-operator">=</span> <span class="hljs-punctuation">(</span><span class="hljs-built_in">length</span><span class="hljs-punctuation">(</span>line<span class="hljs-punctuation">)</span><span class="hljs-operator">-</span><span class="hljs-number">2</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><br> H.ALL<span class="hljs-operator">$</span>TERM2GENE <span class="hljs-operator">&lt;-</span> rbind<span class="hljs-punctuation">(</span>H.ALL<span class="hljs-operator">$</span>TERM2GENE<span class="hljs-punctuation">,</span> cbind<span class="hljs-punctuation">(</span>lc_gsid<span class="hljs-punctuation">,</span>line<span class="hljs-punctuation">[</span><span class="hljs-number">3</span><span class="hljs-operator">:</span><span class="hljs-built_in">length</span><span class="hljs-punctuation">(</span>line<span class="hljs-punctuation">)</span><span class="hljs-punctuation">]</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><br><span class="hljs-punctuation">&#125;</span><br>colnames<span class="hljs-punctuation">(</span>H.ALL<span class="hljs-operator">$</span>TERM2NAME<span class="hljs-punctuation">)</span> <span class="hljs-operator">&lt;-</span> <span class="hljs-built_in">c</span><span class="hljs-punctuation">(</span><span class="hljs-string">&#x27;gsid&#x27;</span><span class="hljs-punctuation">,</span> <span class="hljs-string">&#x27;name&#x27;</span><span class="hljs-punctuation">)</span><br>colnames<span class="hljs-punctuation">(</span>H.ALL<span class="hljs-operator">$</span>TERM2GENE<span class="hljs-punctuation">)</span> <span class="hljs-operator">&lt;-</span> <span class="hljs-built_in">c</span><span class="hljs-punctuation">(</span><span class="hljs-string">&#x27;gsid&#x27;</span><span class="hljs-punctuation">,</span> <span class="hljs-string">&#x27;gene&#x27;</span><span class="hljs-punctuation">)</span><br>saveRDS<span class="hljs-punctuation">(</span>H.ALL<span class="hljs-punctuation">,</span> <span class="hljs-string">&#x27;C5.HPO.rds&#x27;</span><span class="hljs-punctuation">)</span><br></code></pre></td></tr></table></figure>
  137. <h2 id="富集"><a href="#富集" class="headerlink" title="富集"></a>富集</h2><figure class="highlight r"><table><tr><td class="gutter"><pre><span class="line">1</span><br><span class="line">2</span><br><span class="line">3</span><br><span class="line">4</span><br><span class="line">5</span><br><span class="line">6</span><br><span class="line">7</span><br><span class="line">8</span><br><span class="line">9</span><br><span class="line">10</span><br><span class="line">11</span><br><span class="line">12</span><br><span class="line">13</span><br><span class="line">14</span><br><span class="line">15</span><br><span class="line">16</span><br><span class="line">17</span><br><span class="line">18</span><br><span class="line">19</span><br><span class="line">20</span><br><span class="line">21</span><br><span class="line">22</span><br><span class="line">23</span><br><span class="line">24</span><br><span class="line">25</span><br><span class="line">26</span><br></pre></td><td class="code"><pre><code class="hljs R">require<span class="hljs-punctuation">(</span>tidyverse<span class="hljs-punctuation">)</span><br>require<span class="hljs-punctuation">(</span>enrichplot<span class="hljs-punctuation">)</span><br>require<span class="hljs-punctuation">(</span>DOSE<span class="hljs-punctuation">)</span><br>require<span class="hljs-punctuation">(</span>stringr<span class="hljs-punctuation">)</span><br>require<span class="hljs-punctuation">(</span>clusterProfiler<span class="hljs-punctuation">)</span><br>f_kegg_p <span class="hljs-operator">&lt;-</span> <span class="hljs-keyword">function</span><span class="hljs-punctuation">(</span>keggr2<span class="hljs-punctuation">,</span> n <span class="hljs-operator">=</span> <span class="hljs-number">15</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">&#123;</span><br> keggr <span class="hljs-operator">&lt;-</span> subset<span class="hljs-punctuation">(</span>keggr2<span class="hljs-operator">@</span>result<span class="hljs-punctuation">,</span> p.adjust <span class="hljs-operator">&lt;</span> <span class="hljs-number">0.1</span><span class="hljs-punctuation">)</span><br> keggr<span class="hljs-punctuation">[[</span><span class="hljs-string">&#x27;-log(Padj)&#x27;</span><span class="hljs-punctuation">]</span><span class="hljs-punctuation">]</span> <span class="hljs-operator">&lt;-</span> <span class="hljs-operator">-</span>log10<span class="hljs-punctuation">(</span>keggr<span class="hljs-punctuation">[[</span><span class="hljs-string">&#x27;p.adjust&#x27;</span><span class="hljs-punctuation">]</span><span class="hljs-punctuation">]</span><span class="hljs-punctuation">)</span><br> keggr<span class="hljs-punctuation">[[</span><span class="hljs-string">&#x27;geneRatio&#x27;</span><span class="hljs-punctuation">]</span><span class="hljs-punctuation">]</span> <span class="hljs-operator">&lt;-</span> parse_ratio<span class="hljs-punctuation">(</span>keggr<span class="hljs-punctuation">[[</span><span class="hljs-string">&#x27;GeneRatio&#x27;</span><span class="hljs-punctuation">]</span><span class="hljs-punctuation">]</span><span class="hljs-punctuation">)</span><br> keggr<span class="hljs-operator">$</span>Description <span class="hljs-operator">&lt;-</span> factor<span class="hljs-punctuation">(</span>keggr<span class="hljs-operator">$</span>Description<span class="hljs-punctuation">,</span> <br> levels<span class="hljs-operator">=</span>keggr<span class="hljs-punctuation">[</span>order<span class="hljs-punctuation">(</span>keggr<span class="hljs-operator">$</span>geneRatio<span class="hljs-punctuation">)</span><span class="hljs-punctuation">,</span><span class="hljs-punctuation">]</span><span class="hljs-operator">$</span>Description<span class="hljs-punctuation">)</span><br> ggplot<span class="hljs-punctuation">(</span>head<span class="hljs-punctuation">(</span>keggr<span class="hljs-punctuation">,</span>n<span class="hljs-punctuation">)</span><span class="hljs-punctuation">,</span>aes<span class="hljs-punctuation">(</span>x<span class="hljs-operator">=</span>geneRatio<span class="hljs-punctuation">,</span>y<span class="hljs-operator">=</span>Description<span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><span class="hljs-operator">+</span><br> geom_point<span class="hljs-punctuation">(</span>aes<span class="hljs-punctuation">(</span>color<span class="hljs-operator">=</span>`-log(Padj)`<span class="hljs-punctuation">,</span><br> size<span class="hljs-operator">=</span>`Count`<span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><span class="hljs-operator">+</span><br> theme_bw<span class="hljs-punctuation">(</span><span class="hljs-punctuation">)</span><span class="hljs-operator">+</span><br> scale_color_gradient<span class="hljs-punctuation">(</span>low<span class="hljs-operator">=</span><span class="hljs-string">&quot;blue1&quot;</span><span class="hljs-punctuation">,</span>high<span class="hljs-operator">=</span><span class="hljs-string">&quot;brown1&quot;</span><span class="hljs-punctuation">)</span><span class="hljs-operator">+</span><br> labs<span class="hljs-punctuation">(</span>y<span class="hljs-operator">=</span><span class="hljs-literal">NULL</span><span class="hljs-punctuation">)</span> <span class="hljs-operator">+</span> <br> theme<span class="hljs-punctuation">(</span>axis.text.x<span class="hljs-operator">=</span>element_text<span class="hljs-punctuation">(</span>angle<span class="hljs-operator">=</span><span class="hljs-number">90</span><span class="hljs-punctuation">,</span>hjust <span class="hljs-operator">=</span> <span class="hljs-number">1</span><span class="hljs-punctuation">,</span>vjust<span class="hljs-operator">=</span><span class="hljs-number">0.5</span><span class="hljs-punctuation">,</span> size <span class="hljs-operator">=</span> <span class="hljs-number">12</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">,</span><br> axis.text.y<span class="hljs-operator">=</span>element_text<span class="hljs-punctuation">(</span>size <span class="hljs-operator">=</span> <span class="hljs-number">15</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><span class="hljs-operator">+</span><br> scale_size<span class="hljs-punctuation">(</span><span class="hljs-built_in">range</span> <span class="hljs-operator">=</span> <span class="hljs-built_in">c</span><span class="hljs-punctuation">(</span><span class="hljs-number">5</span><span class="hljs-punctuation">,</span><span class="hljs-number">10</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span> <span class="hljs-operator">+</span> <br> theme<span class="hljs-punctuation">(</span>axis.text<span class="hljs-operator">=</span>element_text<span class="hljs-punctuation">(</span>size<span class="hljs-operator">=</span><span class="hljs-number">20</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">,</span>axis.title<span class="hljs-operator">=</span>element_text<span class="hljs-punctuation">(</span>size<span class="hljs-operator">=</span><span class="hljs-number">20</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span> <span class="hljs-operator">+</span> <br> scale_y_discrete<span class="hljs-punctuation">(</span>labels<span class="hljs-operator">=</span><span class="hljs-keyword">function</span><span class="hljs-punctuation">(</span>y<span class="hljs-punctuation">)</span><span class="hljs-punctuation">&#123;</span>str_wrap<span class="hljs-punctuation">(</span>gsub<span class="hljs-punctuation">(</span><span class="hljs-string">&#x27;_&#x27;</span><span class="hljs-punctuation">,</span> <span class="hljs-string">&#x27; &#x27;</span><span class="hljs-punctuation">,</span> y<span class="hljs-punctuation">)</span><span class="hljs-punctuation">,</span>width <span class="hljs-operator">=</span> <span class="hljs-number">20</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">&#125;</span><span class="hljs-punctuation">)</span><br><span class="hljs-punctuation">&#125;</span><br>f_title <span class="hljs-operator">&lt;-</span> <span class="hljs-keyword">function</span><span class="hljs-punctuation">(</span>gp<span class="hljs-punctuation">,</span>title<span class="hljs-punctuation">)</span><span class="hljs-punctuation">&#123;</span><br> gp <span class="hljs-operator">+</span> labs<span class="hljs-punctuation">(</span>title <span class="hljs-operator">=</span> title<span class="hljs-punctuation">)</span> <span class="hljs-operator">+</span> theme<span class="hljs-punctuation">(</span>plot.title <span class="hljs-operator">=</span> element_text<span class="hljs-punctuation">(</span>hjust <span class="hljs-operator">=</span> <span class="hljs-number">0.5</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><br><span class="hljs-punctuation">&#125;</span><br></code></pre></td></tr></table></figure>
  138. <figure class="highlight r"><table><tr><td class="gutter"><pre><span class="line">1</span><br><span class="line">2</span><br><span class="line">3</span><br><span class="line">4</span><br><span class="line">5</span><br><span class="line">6</span><br><span class="line">7</span><br><span class="line">8</span><br><span class="line">9</span><br><span class="line">10</span><br></pre></td><td class="code"><pre><code class="hljs R">KEGG <span class="hljs-operator">&lt;-</span> readRDS<span class="hljs-punctuation">(</span><span class="hljs-string">&#x27;../MsigDB/C5.HPO.rds&#x27;</span><span class="hljs-punctuation">)</span><br>set.seed<span class="hljs-punctuation">(</span><span class="hljs-number">0</span><span class="hljs-punctuation">)</span><br>res <span class="hljs-operator">&lt;-</span> enricher<span class="hljs-punctuation">(</span>gene <span class="hljs-operator">=</span> DEGPH<span class="hljs-operator">$</span>Name<span class="hljs-punctuation">,</span> <br> pAdjustMethod <span class="hljs-operator">=</span> <span class="hljs-string">&quot;fdr&quot;</span><span class="hljs-punctuation">,</span><br> pvalueCutoff <span class="hljs-operator">=</span> <span class="hljs-number">0.1</span><span class="hljs-punctuation">,</span><br> qvalueCutoff <span class="hljs-operator">=</span> <span class="hljs-number">0.1</span><span class="hljs-punctuation">,</span><br> TERM2GENE <span class="hljs-operator">=</span> KEGG<span class="hljs-operator">$</span>TERM2GENE<span class="hljs-punctuation">,</span><br> TERM2NAME <span class="hljs-operator">=</span> KEGG<span class="hljs-operator">$</span>TERM2NAME<span class="hljs-punctuation">)</span><br>options<span class="hljs-punctuation">(</span>repr.plot.width<span class="hljs-operator">=</span><span class="hljs-number">8</span><span class="hljs-punctuation">,</span> repr.plot.height<span class="hljs-operator">=</span><span class="hljs-number">12</span><span class="hljs-punctuation">)</span><br>f_kegg_p<span class="hljs-punctuation">(</span>res<span class="hljs-punctuation">,</span> n <span class="hljs-operator">=</span><span class="hljs-number">15</span><span class="hljs-punctuation">)</span> <span class="hljs-operator">%&gt;%</span> f_title<span class="hljs-punctuation">(</span><span class="hljs-string">&quot;C42vsLNCaP_EtOH_C5_HPO&quot;</span><span class="hljs-punctuation">)</span><br></code></pre></td></tr></table></figure>
  139. <p><a href="https://occdn.limour.top/2142.html">GSEA以及其他高级绘图</a>,注:GESA添加<code>nPermSimple = 100000</code>可以提高P值计算准确性</p>
  140. <h2 id="通过预分配的方式进行构建"><a href="#通过预分配的方式进行构建" class="headerlink" title="通过预分配的方式进行构建"></a>通过预分配的方式进行构建</h2><figure class="highlight r"><table><tr><td class="gutter"><pre><span class="line">1</span><br><span class="line">2</span><br><span class="line">3</span><br><span class="line">4</span><br><span class="line">5</span><br><span class="line">6</span><br><span class="line">7</span><br><span class="line">8</span><br><span class="line">9</span><br><span class="line">10</span><br><span class="line">11</span><br><span class="line">12</span><br><span class="line">13</span><br><span class="line">14</span><br><span class="line">15</span><br><span class="line">16</span><br><span class="line">17</span><br><span class="line">18</span><br><span class="line">19</span><br><span class="line">20</span><br><span class="line">21</span><br></pre></td><td class="code"><pre><code class="hljs R">text <span class="hljs-operator">&lt;-</span> readLines<span class="hljs-punctuation">(</span><span class="hljs-string">&quot;c5.all.v7.5.1.symbols.gmt&quot;</span><span class="hljs-punctuation">,</span> encoding <span class="hljs-operator">=</span> <span class="hljs-string">&quot;UTF-8&quot;</span><span class="hljs-punctuation">)</span><br>text <span class="hljs-operator">&lt;-</span> strsplit<span class="hljs-punctuation">(</span>text<span class="hljs-punctuation">,</span> <span class="hljs-string">&quot;\t&quot;</span><span class="hljs-punctuation">)</span><br>pre_len <span class="hljs-operator">&lt;-</span> 0<br><span class="hljs-keyword">for</span> <span class="hljs-punctuation">(</span>i <span class="hljs-keyword">in</span> <span class="hljs-number">1</span><span class="hljs-operator">:</span><span class="hljs-built_in">length</span><span class="hljs-punctuation">(</span>text<span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">&#123;</span><br>line <span class="hljs-operator">&lt;-</span> text<span class="hljs-punctuation">[[</span>i<span class="hljs-punctuation">]</span><span class="hljs-punctuation">]</span><br> pre_len <span class="hljs-operator">&lt;-</span> pre_len <span class="hljs-operator">+</span> <span class="hljs-punctuation">(</span><span class="hljs-built_in">length</span><span class="hljs-punctuation">(</span>line<span class="hljs-punctuation">)</span><span class="hljs-operator">-</span><span class="hljs-number">2</span><span class="hljs-punctuation">)</span><br><span class="hljs-punctuation">&#125;</span><br>H.ALL <span class="hljs-operator">&lt;-</span> <span class="hljs-built_in">list</span><span class="hljs-punctuation">(</span>TERM2NAME<span class="hljs-operator">=</span>data.frame<span class="hljs-punctuation">(</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">,</span> TERM2GENE<span class="hljs-operator">=</span>data.frame<span class="hljs-punctuation">(</span>gsid<span class="hljs-operator">=</span><span class="hljs-built_in">rep</span><span class="hljs-punctuation">(</span><span class="hljs-literal">NA</span><span class="hljs-punctuation">,</span>pre_len<span class="hljs-punctuation">)</span><span class="hljs-punctuation">,</span> gene<span class="hljs-operator">=</span><span class="hljs-built_in">rep</span><span class="hljs-punctuation">(</span><span class="hljs-literal">NA</span><span class="hljs-punctuation">,</span>pre_len<span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><br>pre_tmp <span class="hljs-operator">&lt;-</span> 0<br><span class="hljs-keyword">for</span> <span class="hljs-punctuation">(</span>i <span class="hljs-keyword">in</span> <span class="hljs-number">1</span><span class="hljs-operator">:</span><span class="hljs-built_in">length</span><span class="hljs-punctuation">(</span>text<span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><span class="hljs-punctuation">&#123;</span><br> line <span class="hljs-operator">&lt;-</span> text<span class="hljs-punctuation">[[</span>i<span class="hljs-punctuation">]</span><span class="hljs-punctuation">]</span><br> gsid <span class="hljs-operator">&lt;-</span> line<span class="hljs-punctuation">[</span><span class="hljs-number">1</span><span class="hljs-punctuation">]</span><br> H.ALL<span class="hljs-operator">$</span>TERM2NAME <span class="hljs-operator">&lt;-</span> rbind<span class="hljs-punctuation">(</span>H.ALL<span class="hljs-operator">$</span>TERM2NAME<span class="hljs-punctuation">,</span> <span class="hljs-built_in">c</span><span class="hljs-punctuation">(</span>i<span class="hljs-punctuation">,</span>gsid<span class="hljs-punctuation">)</span><span class="hljs-punctuation">)</span><br> pre_genelen <span class="hljs-operator">&lt;-</span> <span class="hljs-punctuation">(</span><span class="hljs-built_in">length</span><span class="hljs-punctuation">(</span>line<span class="hljs-punctuation">)</span><span class="hljs-operator">-</span><span class="hljs-number">2</span><span class="hljs-punctuation">)</span><br> lc_gsid <span class="hljs-operator">&lt;-</span> <span class="hljs-built_in">rep</span><span class="hljs-punctuation">(</span>x <span class="hljs-operator">=</span> i<span class="hljs-punctuation">,</span> times <span class="hljs-operator">=</span> pre_genelen<span class="hljs-punctuation">)</span><br> H.ALL<span class="hljs-operator">$</span>TERM2GENE<span class="hljs-punctuation">[</span><span class="hljs-punctuation">(</span>pre_tmp<span class="hljs-operator">+</span><span class="hljs-number">1</span><span class="hljs-punctuation">)</span><span class="hljs-operator">:</span><span class="hljs-punctuation">(</span>pre_tmp <span class="hljs-operator">+</span> pre_genelen<span class="hljs-punctuation">)</span><span class="hljs-punctuation">,</span><span class="hljs-punctuation">]</span> <span class="hljs-operator">&lt;-</span> cbind<span class="hljs-punctuation">(</span>lc_gsid<span class="hljs-punctuation">,</span>line<span class="hljs-punctuation">[</span><span class="hljs-number">3</span><span class="hljs-operator">:</span><span class="hljs-built_in">length</span><span class="hljs-punctuation">(</span>line<span class="hljs-punctuation">)</span><span class="hljs-punctuation">]</span><span class="hljs-punctuation">)</span><br> pre_tmp <span class="hljs-operator">&lt;-</span> pre_tmp <span class="hljs-operator">+</span> pre_genelen<br><span class="hljs-punctuation">&#125;</span><br>colnames<span class="hljs-punctuation">(</span>H.ALL<span class="hljs-operator">$</span>TERM2NAME<span class="hljs-punctuation">)</span> <span class="hljs-operator">&lt;-</span> <span class="hljs-built_in">c</span><span class="hljs-punctuation">(</span><span class="hljs-string">&#x27;gsid&#x27;</span><span class="hljs-punctuation">,</span> <span class="hljs-string">&#x27;name&#x27;</span><span class="hljs-punctuation">)</span><br>colnames<span class="hljs-punctuation">(</span>H.ALL<span class="hljs-operator">$</span>TERM2GENE<span class="hljs-punctuation">)</span> <span class="hljs-operator">&lt;-</span> <span class="hljs-built_in">c</span><span class="hljs-punctuation">(</span><span class="hljs-string">&#x27;gsid&#x27;</span><span class="hljs-punctuation">,</span> <span class="hljs-string">&#x27;gene&#x27;</span><span class="hljs-punctuation">)</span><br>saveRDS<span class="hljs-punctuation">(</span>H.ALL<span class="hljs-punctuation">,</span> <span class="hljs-string">&#x27;C5.all.rds&#x27;</span><span class="hljs-punctuation">)</span><br></code></pre></td></tr></table></figure>
  141. </div>
  142. <hr/>
  143. <div>
  144. <div class="post-metas my-3">
  145. <div class="post-meta mr-3 d-flex align-items-center">
  146. <i class="iconfont icon-category"></i>
  147. <span class="category-chains">
  148. <span class="category-chain">
  149. <a href="/categories/%E9%80%9A%E8%B7%AF%E5%AF%8C%E9%9B%86/" class="category-chain-item">通路富集</a>
  150. </span>
  151. </span>
  152. </div>
  153. </div>
  154. <div class="license-box my-3">
  155. <div class="license-title">
  156. <div>clusterProfiler:构建MsigDB的数据库</div>
  157. <div>https://occdn.limour.top/2190.html</div>
  158. </div>
  159. <div class="license-meta">
  160. <div class="license-meta-item">
  161. <div>Author</div>
  162. <div>Limour</div>
  163. </div>
  164. <div class="license-meta-item license-meta-date">
  165. <div>Posted on</div>
  166. <div>August 7, 2022</div>
  167. </div>
  168. <div class="license-meta-item">
  169. <div>Licensed under</div>
  170. <div>
  171. <a class="print-no-link" target="_blank" href="https://creativecommons.org/licenses/by-nc-sa/4.0/">
  172. <span class="hint--top hint--rounded" aria-label="BY - Attribution">
  173. <i class="iconfont icon-by"></i>
  174. </span>
  175. </a>
  176. <a class="print-no-link" target="_blank" href="https://creativecommons.org/licenses/by-nc-sa/4.0/">
  177. <span class="hint--top hint--rounded" aria-label="NC - Non-commercial">
  178. <i class="iconfont icon-nc"></i>
  179. </span>
  180. </a>
  181. <a class="print-no-link" target="_blank" href="https://creativecommons.org/licenses/by-nc-sa/4.0/">
  182. <span class="hint--top hint--rounded" aria-label="SA - Share-alike">
  183. <i class="iconfont icon-sa"></i>
  184. </span>
  185. </a>
  186. </div>
  187. </div>
  188. </div>
  189. <div class="license-icon iconfont"></div>
  190. </div>
  191. <div class="post-prevnext my-3">
  192. <article class="post-prev col-6">
  193. <a href="/2195.html" title="将多数据集转化成无依赖的数据格式,进行单变量COXPH,并进行RRA整合">
  194. <i class="iconfont icon-arrowleft"></i>
  195. <span class="hidden-mobile">将多数据集转化成无依赖的数据格式,进行单变量COXPH,并进行RRA整合</span>
  196. <span class="visible-mobile">Previous</span>
  197. </a>
  198. </article>
  199. <article class="post-next col-6">
  200. <a href="/2187.html" title="免费CDN:博客套用CFT尝试">
  201. <span class="hidden-mobile">免费CDN:博客套用CFT尝试</span>
  202. <span class="visible-mobile">Next</span>
  203. <i class="iconfont icon-arrowright"></i>
  204. </a>
  205. </article>
  206. </div>
  207. </div>
  208. </article>
  209. </div>
  210. </div>
  211. </div>
  212. <div class="side-col d-none d-lg-block col-lg-2">
  213. <aside class="sidebar" style="margin-left: -1rem">
  214. <div id="toc">
  215. <p class="toc-header">
  216. <i class="iconfont icon-list"></i>
  217. <span>Table of Contents</span>
  218. </p>
  219. <div class="toc-body" id="toc-body"></div>
  220. </div>
  221. </aside>
  222. </div>
  223. </div>
  224. </div>
  225. <a id="scroll-top-button" aria-label="TOP" href="#" role="button">
  226. <i class="iconfont icon-arrowup" aria-hidden="true"></i>
  227. </a>
  228. <div class="modal fade" id="modalSearch" tabindex="-1" role="dialog" aria-labelledby="ModalLabel"
  229. aria-hidden="true">
  230. <div class="modal-dialog modal-dialog-scrollable modal-lg" role="document">
  231. <div class="modal-content">
  232. <div class="modal-header text-center">
  233. <h4 class="modal-title w-100 font-weight-bold">Search</h4>
  234. <button type="button" id="local-search-close" class="close" data-dismiss="modal" aria-label="Close">
  235. <span aria-hidden="true">&times;</span>
  236. </button>
  237. </div>
  238. <div class="modal-body mx-3">
  239. <div class="md-form mb-5">
  240. <input type="text" id="local-search-input" class="form-control validate">
  241. <label data-error="x" data-success="v" for="local-search-input">Keyword</label>
  242. </div>
  243. <div class="list-group" id="local-search-result"></div>
  244. </div>
  245. </div>
  246. </div>
  247. </div>
  248. </main>
  249. <footer>
  250. <div class="footer-inner">
  251. <div class="footer-content">
  252. <a target="_blank" rel="nofollow noopener" href="http://www.beian.gov.cn/portal/registerSystemInfo?recordcode=43130202000203"><img src="https://img.limour.top/2023/08/27/64eadeb81d6a0.webp" srcset="https://jscdn.limour.top/gh/Limour-dev/Sakurairo_Vision/load_svg/inload.svg" lazyload>湘公网安备 43130202000203号 </a> <a target="_blank" rel="nofollow noopener" href="https://beian.miit.gov.cn/">湘ICP备20008299号 </a> <a target="_blank" rel="nofollow noopener" href="https://icp.gov.moe/?keyword=20210128">萌ICP备20210128号</a> <br> <a href="https://www.foreverblog.cn/" target="_blank"> <img src="https://img.foreverblog.cn/logo_en_default.png" srcset="https://jscdn.limour.top/gh/Limour-dev/Sakurairo_Vision/load_svg/inload.svg" lazyload alt="" style="width:auto;height:24px"> </a> <br> <a href="https://hexo.io" target="_blank" rel="nofollow noopener"><span>Hexo</span></a> <i class="iconfont icon-love"></i> <a href="https://github.com/fluid-dev/hexo-theme-fluid" target="_blank" rel="nofollow noopener"><span>Fluid</span></a> <i class="iconfont icon-love"></i> <a href="https://github.com/limour-blog/archives-occdn" target="_blank" rel="nofollow noopener"><span>SRC</span></a>
  253. </div>
  254. </div>
  255. </footer>
  256. <!-- Scripts -->
  257. <script src="https://jscdn.limour.top/npm/nprogress@0.2.0/nprogress.min.js" ></script>
  258. <link rel="stylesheet" href="https://jscdn.limour.top/npm/nprogress@0.2.0/nprogress.min.css" />
  259. <script>
  260. NProgress.configure({"showSpinner":false,"trickleSpeed":100})
  261. NProgress.start()
  262. window.addEventListener('load', function() {
  263. NProgress.done();
  264. })
  265. </script>
  266. <script src="https://jscdn.limour.top/npm/jquery@3.6.4/dist/jquery.min.js" ></script>
  267. <script src="https://jscdn.limour.top/npm/bootstrap@4.6.1/dist/js/bootstrap.min.js" ></script>
  268. <script src="/js/events.js" ></script>
  269. <script src="/js/plugins.js" ></script>
  270. <script src="https://lib.baomitu.com/typed.js/2.0.12/typed.min.js" ></script>
  271. <script>
  272. (function (window, document) {
  273. var typing = Fluid.plugins.typing;
  274. var subtitle = document.getElementById('subtitle');
  275. if (!subtitle || !typing) {
  276. return;
  277. }
  278. var text = subtitle.getAttribute('data-typed-text');
  279. typing(text);
  280. })(window, document);
  281. </script>
  282. <script src="/js/img-lazyload.js" ></script>
  283. <script>
  284. Fluid.utils.createScript('https://jscdn.limour.top/npm/tocbot@4.20.1/dist/tocbot.min.js', function() {
  285. var toc = jQuery('#toc');
  286. if (toc.length === 0 || !window.tocbot) { return; }
  287. var boardCtn = jQuery('#board-ctn');
  288. var boardTop = boardCtn.offset().top;
  289. window.tocbot.init(Object.assign({
  290. tocSelector : '#toc-body',
  291. contentSelector : '.markdown-body',
  292. linkClass : 'tocbot-link',
  293. activeLinkClass : 'tocbot-active-link',
  294. listClass : 'tocbot-list',
  295. isCollapsedClass: 'tocbot-is-collapsed',
  296. collapsibleClass: 'tocbot-is-collapsible',
  297. scrollSmooth : true,
  298. includeTitleTags: true,
  299. headingsOffset : -boardTop,
  300. }, CONFIG.toc));
  301. if (toc.find('.toc-list-item').length > 0) {
  302. toc.css('visibility', 'visible');
  303. }
  304. Fluid.events.registerRefreshCallback(function() {
  305. if ('tocbot' in window) {
  306. tocbot.refresh();
  307. var toc = jQuery('#toc');
  308. if (toc.length === 0 || !tocbot) {
  309. return;
  310. }
  311. if (toc.find('.toc-list-item').length > 0) {
  312. toc.css('visibility', 'visible');
  313. }
  314. }
  315. });
  316. });
  317. </script>
  318. <script src=https://lib.baomitu.com/clipboard.js/2.0.11/clipboard.min.js></script>
  319. <script>Fluid.plugins.codeWidget();</script>
  320. <script>
  321. Fluid.utils.createScript('https://jscdn.limour.top/npm/anchor-js@4.3.1/anchor.min.js', function() {
  322. window.anchors.options = {
  323. placement: CONFIG.anchorjs.placement,
  324. visible : CONFIG.anchorjs.visible
  325. };
  326. if (CONFIG.anchorjs.icon) {
  327. window.anchors.options.icon = CONFIG.anchorjs.icon;
  328. }
  329. var el = (CONFIG.anchorjs.element || 'h1,h2,h3,h4,h5,h6').split(',');
  330. var res = [];
  331. for (var item of el) {
  332. res.push('.markdown-body > ' + item.trim());
  333. }
  334. if (CONFIG.anchorjs.placement === 'left') {
  335. window.anchors.options.class = 'anchorjs-link-left';
  336. }
  337. window.anchors.add(res.join(', '));
  338. Fluid.events.registerRefreshCallback(function() {
  339. if ('anchors' in window) {
  340. anchors.removeAll();
  341. var el = (CONFIG.anchorjs.element || 'h1,h2,h3,h4,h5,h6').split(',');
  342. var res = [];
  343. for (var item of el) {
  344. res.push('.markdown-body > ' + item.trim());
  345. }
  346. if (CONFIG.anchorjs.placement === 'left') {
  347. anchors.options.class = 'anchorjs-link-left';
  348. }
  349. anchors.add(res.join(', '));
  350. }
  351. });
  352. });
  353. </script>
  354. <script>
  355. Fluid.utils.createScript('https://lib.baomitu.com/fancybox/3.5.7/jquery.fancybox.min.js', function() {
  356. Fluid.plugins.fancyBox();
  357. });
  358. </script>
  359. <script>Fluid.plugins.imageCaption();</script>
  360. <script src="/js/local-search.js" ></script>
  361. <!-- 主题的启动项,将它保持在最底部 -->
  362. <!-- the boot of the theme, keep it at the bottom -->
  363. <script src="/js/boot.js" ></script>
  364. <noscript>
  365. <div class="noscript-warning">Blog works best with JavaScript enabled</div>
  366. </noscript>
  367. <!-- hexo injector body_end start -->
  368. <script defer src="/theme-inject/timeliness.js"></script>
  369. <!-- hexo injector body_end end --></body>
  370. </html>