今晨，运行代码出现错误：

Error in separate(., row, c("symbol", "ensemble", "genetype"), sep = " \| ") :

没有"separate"这个函数

原代码如下

res <- res %>%
   separate(row,c("symbol","ensemble","genetype"),sep = " \\| ") %>%
   dplyr::select(- c(ensemble,genetype)) %>%
   arrange(desc(abs(log2FoldChange))) %>% #排序。为了去重
   distinct(symbol,.keep_all = TRUE) %>%
   arrange(desc(log2FoldChange))#再次按照log2FoldChange从大到小排序

结果报错。
百度发现separate在tidyr包中，于是，加载此包、

library(dplyr,tidyr,DESeq2)
#再次出现错误后，将几个包全上上

还是出现错误。百度，看到之前有文章separate前面带有tidyr
同理，加上tidyr，成功

res <- res %>%
  tidyr::separate(row,c("symbol","ensemble","genetype"),sep = " \\| ") %>%
  dplyr::select(- c(ensemble,genetype)) %>%
  arrange(desc(abs(log2FoldChange))) %>% #排序。为了去重
  distinct(symbol,.keep_all = TRUE) %>%
  arrange(desc(log2FoldChange))#再次按照log2FoldChange从大到小排序

image.png

attention：转载请注明出处