| WU160118 | R Documentation |
WU160118 Mascot Search results
Christian Panse
https://fgcz-bfabric.uzh.ch/bfabric/userlab/show-workunit.html?id=160118
please read the vignette summaryFASTA.Rmd.
library(ExperimentHub)
eh <- ExperimentHub();
load(query(eh, c("NestLink", "WU160118.RData"))[[1]])
class(WU160118)
PATTERN <- "^GS[ASTNQDEFVLYWGP]{7}(WR|WLTVR|WQEGGR|WLR|WQSR)$"
idx <- grepl(PATTERN, WU160118$pep_seq)
WU <- WU160118[idx & WU160118$pep_score > 25,]
library(lattice)
histogram(~RTINSECONDS| datfilename, data = WU, type='count')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.