knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
Load the package
library(IntCRISPR)
Load the batch correction
load("CombatOrig.Rdata") load("SangerData.Rdata") load("BroadData.Rdata")
Perform batch correction:
CorrectedData<-BatchCorrection(data1=BroadData,data2=SangerData,CombatRes=CombatOrig)$qNorm
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.