格式化ggplot2 gaphis - 曼哈顿情节

Question

我使用ggplot2包在R中编程了以下图表。 但有些细节我无法改变。

为此，我使用以下编程：

b=ggplot(data1,aes(pos,P),group =CHR) + geom_point(size=1, aes(color=CHR)) +
guides(fill=FALSE) + 
geom_hline(yintercept=20,colour="green", alpha=I(2/3)) +
geom_hline(yintercept=150,colour="red", alpha=I(3/3))
b+ scale_x_discrete("Chromosome", labels = c(1:27))

1º：我想删除“染色体”的比例图例。我把guides(fill=FALSE)，但没有解决。

2º：我想要对每条染色体的x轴进行划界。为了尝试这个，我把：scale_x_discrete("Chromosome", labels = c(1:27))。但没有解决问题。

3º：在标签染色体上有一条很厚的黑色腰带。我想删除它。

谢谢。