相关疑难解决方法(0)

(这跟随ggplot2黄土Q我得到了一个很好的答案) - 导致这个情节:

我的R知识非常有限(对不起!)

我使用表data1中的数据绘制散点图.

data1<-NaRV.omit(data[,c(2,3,7,10)]) #(2=start, 3=end, 7=value, 10=type)
ylabs='E / A - ratio'
p1<-ggplot(data1, aes(x=start, y=value)) +
ylim(0,5) +
geom_point(shape=points, col=pointcol1, na.rm=T) +
geom_hline(aes(yintercept=1, col=linecol)) +
geom_smooth(method="loess", span=spanv, fullrange=F, se=T, na.rm=T) +
#
xlab(xlabs) +
ylab(ylabs)

一些地区没有数据(包括中间的一个大区域,但也包括较小的离散区域),我想在y = 0处绘制一个彩色区段来说明这一事实

我将两种数据类型合并到一个表中,标签列为#10 ='type'(散射数据的内容='cnv'和no-data ='nregion').nregions在值列中有0.

如何仅为散点图获取"cnv"数据,仅绘制"nregion"数据以绘制线段; 两个都在同一个情节？

我找到了geom_segment:

+ geom_segment(aes(x=data1$start, y=0, xend=data1$end, yend=0))

但是我找不到每种ggplot子图的子集方法.

谢谢

嗨@gauden我尝试了你的方法,它部分工作.我的问题是我不能像你使用的那样很好地划分我的数据] -1; 0]因为我的nregions是分散的(由图中的蓝点和线表示),并且每个新图都不同,如下图所示:

因此,黄土像以前一样经过大的地区.如何防止nregions中的黄土？

#############################
## plot settings (edit below)
spanv<-0.1
pointcol1="#E69F00"
pointcol2="#56B4E9"
pointcol3="#009E73"
points=20
onecol="green"
colnreg="blue"
xlabs=paste(onechr, " position", " (loess-span=", spanv, …