view flatten_mzIdentML.R @ 70:71e47a3e1bf5 draft

Uploaded
author bornea
date Sat, 27 Aug 2016 23:11:16 -0400
parents d8cc862e6412
children 47aa4f551c53
line wrap: on
line source

#! /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)