setwd('D:\\11_NM_DNAmeth\\02_DMs_DMR\\02_DMS')
library(ggplot2)
data1<-read.table('./1plot_density.txt',header = 0)[3:4]
# colnames(data1)<-c('context','value')
colnames(data1)<-c('context','value')
head(data1)
> head(data1)
context value
1 CG 0.20
2 CG -0.02
3 CG 0.20
4 CG -0.03
5 CG -0.10
6 CG 0.15
>
ggplot(data1,aes(x=value,group=factor(context)
DMR_DMS_ggline
最新推荐文章于 2022-05-22 17:14:18 发布