diff clusterProfiler_bitr.R @ 0:e7a71e686f53 draft

planemo upload for repository https://github.com/kpbioteam/clusterProfiler_bitr commit 470dccce41afc79ef1cc7a6722b50d0c258e0f4f
author kpbioteam
date Mon, 19 Mar 2018 14:03:04 -0400
parents
children 90120121398f
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/clusterProfiler_bitr.R	Mon Mar 19 14:03:04 2018 -0400
@@ -0,0 +1,14 @@
+require("clusterProfiler", quietly = TRUE)
+require("org.Hs.eg.db", quietly = TRUE)
+
+args <- commandArgs(trailingOnly = TRUE)
+
+input1 = args[1]
+input2 = args[2]
+input3 = args[3]
+output = args[4]
+
+gene <- c(read.table(input1))
+gene.df = bitr(gene$V1, fromType=input2, toType=input3, OrgDb="org.Hs.eg.db")
+
+write.table(gene.df,file = output,row.names = FALSE)