ggplot2中的重叠线

我适合两种模型的500条曲线。我根据模型绘制每个拟合以检查相似之处。麻烦在于一套线将覆盖另一套。在下面的例子中，物流线完全由样条线覆盖。ggplot2中的重叠线

有没有一种方法可以绘制两个适合并防止重叠，所以我仍然可以看到两组线条？也许通过改变颜色或使用不同的几何？

ggplot(data=fullData,aes(X,Y,color=Model,group=id))+geom_line()

enter image description here

> dput(head(fullData)) 
structure(list(X = c(-6, -5.97595190380762, -5.95190380761523, 
-5.92785571142285, -5.90380761523046, -5.87975951903808), Model = c("Logistic", 
"Logistic", "Logistic", "Logistic", "Logistic", "Logistic"), 
    Y = c(40.2327812336246, 40.2062250618146, 40.1837765087578, 
    40.1613100197852, 40.1387156930829, 40.1159930605682), id = c(1L, 
    1L, 1L, 1L, 1L, 1L)), .Names = c("X", "Model", "Y", "id"), row.names = c(NA, 
6L), class = "data.frame")

来源

2013-06-01 Glen

我可能只是调整阿尔法。如果您发布数据的dput（）（或至少几行），那么人们可以发布一些示例。 – David

@David将alpha调整到一个小的级别（.1）会有帮助，谢谢。我不知道如何发布数据，因为一个适合在500点的网格... – Glen

@Glen：阅读http://tinyurl.com/reproducible-000关于创建可重复的例子的提示... –

高兴阿尔法摸索出适合你。如果你想成为能够接受+关闭，你可以直接点击加入阿尔法这个例子的要求（有一些模拟数据）：

library(ggplot2) 

#function to generate some data 
makeLine <- function(x){ 
    set.seed(x) 
    Y <- c(runif(1,38,42),runif(1,34,38),runif(1,28,32),runif(1,23,27),runif(1,10,20)) 
    X <- c(-6,-3,0,3,6) 
    if(x > 40){ 
    model <- "Spline" 
    } else { 
    model <- "Logistic" 
    } 
    data.frame(X=X,Y=Y,id=x,model=model) 
} 

#make a data set 
dat <- do.call(rbind,lapply(1:100,makeLine)) 

#add alpha to your plot 
ggplot(data=dat,aes(X,Y,color=model,group=id)) + geom_line(alpha=0.15)

enter image description here

来源

2013-06-02 14:59:31 David

ggplot2中的重叠线

回答

相关问题