createPoolScreenExp {gscreend} | R Documentation |
Create PoolScreenExp Experiment
createPoolScreenExp(data)
data |
Input data object containing gRNA level data (SummarizedExperiment) |
object PoolScreenExp object
raw_counts <- read.table( system.file('extdata', 'simulated_counts.txt', package = 'gscreend'), header=TRUE) 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 = c('T0', 'T1', 'T1')) library(SummarizedExperiment) se <- SummarizedExperiment(assays=list(counts=counts_matrix), rowData=rowData, colData=colData) # create a PoolScreenExp experiment pse <- createPoolScreenExp(se)