## Not run:
# w <- newMsmsWorkspace
# w@files <- c("spec1", "spec2")
# w1 <- msmsWorkflow(w, steps=c(1:7), mode="pH")
# w2 <- msmsWorkflow(w, steps=c(1:7), mode="pH", confirmMode = 1)
# wTotal <- combineMultiplicities(c(w1, w2))
# wTotal <- msmsWorkflow(wTotal, steps=8, mode="pH", archivename = "output")
# # continue here with mbWorkflow
# ## End(Not run)
Run the code above in your browser using DataLab