protP <- c(protP="PEPTIDE")
pepT1 <- makeFragments(protTab=protP, minFragSize=2, maxFragSize=9, internFra=TRUE)
tail(pepT1)
protP2 <- cbind(se="PEPTIDE", ma="1304.7088503626")
pepT2 <- makeFragments(protTab=protP2, minFragSize=2, maxFragSize=9, internFra=TRUE)
tail(pepT1)
Run the code above in your browser using DataLab