setwd("/share/nas1/huangls/test/hypertension")
library(org.Hs.eg.db)
library(annotate)
df=read.table("GPL19109.soft.1",header = T,sep = "\t",stringsAsFactors = F)
df=df[!is.na(df$ENTREZ_GENE_ID),]
name=getSYMBOL(as.character(df$ENTREZ_GENE_ID), data="org.Hs.eg.db")
df$`Gene Symbol`=name
head(df)
如果觉得我的文章对您有用,请随意打赏。你的支持将鼓励我继续创作!