Nothing
Set up a SummarizedExperiment object containing a matrix of raw count data, rowData on gRNAs and genes and colData on the sample type.
counts_matrix <- cbind(raw_counts$library0, raw_counts$R0_0, raw_counts$R1_0)
rowData <- data.frame(sgRNA_id = raw_counts$sgrna_id,
gene = raw_counts$Gene)
colData <- data.frame(samplename = c("library", "R1", "R2"),
# timepoint naming convention:
# T0 -> reference,
# T1 -> selected
timepoint = c("T0", "T1", "T1"))
se <- SummarizedExperiment(assays=list(counts=counts_matrix),
rowData=rowData, colData=colData)
Create a PoolScreenExp object
pse <- createPoolScreenExp(se)
Run gscreend
pse <- RunGscreend(pse)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.