文件‘CF17.kmer’部分内容
154431233682528695169316001115347708702054631586163256363672510092282080766191832182310170087251116532083121667943613173248371418363977... ...
library(ggplot2)
df1 <- read.table('CF17.kmer',header = FALSE,sep=' ')
ggplot(df1,aes(V1,V2)) + \
geom_line() + \
xlim(0,150)+ylim(0,1e+8) + \ #调整坐标范围（会舍弃一些数据）
labs(x='Depth',y='Number',title='K-mer distribution') + \ #源文件中无header，设置坐标轴及标题名称
theme(plot.title = element_text(hjust = 0.5)) #将标题名称居中
