H3K27me3_ChIPseqSpikeInFree.Rmd

---
title: "ChIPseqSpikeInFree"
author: "chenli"
date: "2022/8/25"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

```{r}
library("ChIPseqSpikeInFree")

```

```{r}
setwd("./05.ChIPseqSpikeInFree")
```



```{r}
metaFile <- "sample_meta.txt" 
meta <- read.table(metaFile, header = T)
bams <- paste0("../04.Filter/",as.character(meta$ID))

ChIPseqSpikeInFree(bamFiles = bams,chromFile = "hg38",metaFile = metaFile,prefix = "H3K27me3",cutoff_QC = 1,maxLastTurn=0.97,ncores = 6)


```


```{r}


```