## --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------＃实验<-Chipqc（样本）＃ChipqCreport（实验）## ----------------------，eval = false ---------------------------------------------------------------＃库（chippeakanno）＃## ...＃注释<-AntotatePeakinBatch（峰，＃annotationData =注释）## ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------＃library（diffbind）＃tamoxifen = dba（samplesheet =“ tamoxifen.csv”）＃tamoxifen = dba.count（tamoxifen）＃tamoxifen = dba.concontast（tamoxifen，＃类别= dba_condition）＃tamoxifen = dba.analyze（tamoxifen）＃tamoxifen）