绘图中没有图层（R）

我有一张如下所示的桌子

chr1    500     15      0.502   na
chr1    1000    21      0.641   0.019704955
chr1    1500    21      0.621   0.016777844
chr1    2000    22      0.534   na
chr1    2500    35      0.698   0.028712731
chr2    4500    2       0.371   na    
chr2    5000    3       0.342   na    
chr4    5500    1       0.068   na    
chr4    6000    0       0.000   na    
chr4    6500    0       0.000   na    
chr5    7000    2       0.079   na    
chr5    7500    12      0.440   na

从这个表中，我想生成多个图-每个chr一个-其中Xaxis和Y轴将是第2列和第5列

根据对另一个问题的回答，我尝试了这个

require(ggplot2)
require(plyr)
Y <- read.table("integ.pi")
names(Y) <- c("Chr","Window","SNPs","covfra","pi")
chrs <- levels(Y[,"Chr"])
c <- lapply(chrs, function(chr) {
ggplot(Y[Y[, "Chr"]==chr,], aes(x=as.factor(Window), y=pi)) 
})  
lapply(c)

require（ggplot2）
需要（plyr）
Y这只是一个简单的示例，了解如何使用命令：

library(ggplot2)

dt = data.frame(Chr = c("c1","c1","c1","c2","c2","c2","c3","c3","c3"),
                x = c(1,2,3,4,5,6,7,8,9),
                y = c(2,4,5,2,3,4,6,6,7))

ggplot(dt, aes(x,y, col=Chr)) +
  geom_point(size = 3) +
  geom_line() +
  facet_grid(. ~ Chr) # remove this to have all lines in same plot

好吧，正如这条信息所暗示的：在绘图中添加一层，比如
geom_point
或其他什么。请参阅，您将需要定义使用
ggplot
打印的内容。如果需要点（散点图），
geom\u点
，如果需要线，
geom\u线
。试着阅读ggplot教程，如果你用谷歌搜索，会有很多。作为旁注：
c（）
是R中的一个函数。因此，给变量命名
c
是不好的做法。