comparison MetaMA.R @ 2:f18413a94742 draft

planemo upload for repository https://github.com/sblanck/smagexp/tree/master/smagexp_tools commit b53a3997a880872df62a84370133b9a955e70418
author sblanck
date Thu, 22 Feb 2018 09:49:29 -0500
parents 1024245abc70
children 3ce32282f6a4
comparison
equal deleted inserted replaced
1:a978d1560ea3 2:f18413a94742
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){