diff flatten_mzIdentML.R @ 66:d8cc862e6412 draft

Uploaded
author bornea
date Sat, 27 Aug 2016 22:14:02 -0400
parents
children 47aa4f551c53
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/flatten_mzIdentML.R	Sat Aug 27 22:14:02 2016 -0400
@@ -0,0 +1,9 @@
+#! /usr/bin/Rscript
+args <- commandArgs(trailingOnly = TRUE)
+#source("https://bioconductor.org/biocLite.R")
+#biocLite("mzID")
+library(mzID)
+library(dplyr)
+mzResults <- mzID(args[1])
+flatresults <- flatten(mzResults)
+write.table(flatresults,"flat_mzIdentML.txt",sep="\t",quote=FALSE,row.names=FALSE)
\ No newline at end of file