#BiocManager::install("clusterProfiler")
#BiocManager::install("org.Hs.eg.db")
library(org.Hs.eg.db)
library("clusterProfiler")
data <- read.table("C:/Users/cendy/Desktop/counts.txt", header=TRUE, quote="\t",skip = 1)
geneList <- data$Geneid
source("http://bioconductor.org/biocLite.R")
options(BioC_mirror="http://mirrors.ustc.edu.cn/bioc/")
gene.df <- bitr(geneList, fromType = "ENSEMBL", #fromType是指你的數(shù)據(jù)ID類型是屬于哪一類的
? ? ? ? ? ? ? ? toType = c("ENSEMBL", "SYMBOL"), #toType是指你要轉(zhuǎn)換成哪種ID類型卓鹿，可以寫(xiě)多種侦讨，也可以只寫(xiě)一種
? ? ? ? ? ? ? ? OrgDb = org.Hs.eg.db)#Orgdb是指對(duì)應(yīng)的注釋包是哪個(gè)
head(gene.df)
