comparison MetaMA.R @ 21:f953fdee364c draft

planemo upload for repository https://github.com/sblanck/smagexp/tree/master/smagexp_tools commit ecb5d3451f1623e0cc649ac5197e66995ce19eef-dirty
author sblanck
date Thu, 22 Feb 2018 10:19:47 -0500
parents a4015af2ae12
children 22e1325aaa88
comparison
equal deleted inserted replaced
20:a4015af2ae12 21:f953fdee364c
70 if(!species %in% installed.packages()[,"Package"]) { 70 if(!species %in% installed.packages()[,"Package"]) {
71 source("https://bioconductor.org/biocLite.R") 71 source("https://bioconductor.org/biocLite.R")
72 biocLite(species) 72 biocLite(species)
73 } 73 }
74 74
75 #library("org.Hs.eg.db") 75 library("org.Hs.eg.db")
76 x <- org.Hs.egUNIGENE 76 x <- org.Hs.egUNIGENE
77 mapped_genes <- mappedkeys(x) 77 mapped_genes <- mappedkeys(x)
78 link <- as.list(x[mapped_genes]) 78 link <- as.list(x[mapped_genes])
79 79
80 probe2unigene<-function(expset){ 80 probe2unigene<-function(expset){