我想为两个样本创建经验累积分布函数并将这些图放在同一个图中 [R]

Question

我正在使用此代码生成两个样本的经验累积分布函数（您可以在其中输入任何数值）。我想将它们放在同一个图中，但如果你运行以下命令，一切都会重叠，这真的很糟糕 [见图 1]。有没有办法像这样[见图2]（我也希望符号消失并且像图2一样成为一条线）。

plot(ecdf(sample[,1]),pch = 1)
par(new=TRUE)        
plot(ecdf(sample[,2]),pch = 2)

图片1：https://www.dropbox.com/s/sg1fr8jydsch4xp/vanboeren2.png?dl=0

图2：https://www.dropbox.com/s/erhgla34y5bxa58/vanboeren1.png?dl=0

更新：我正在做这个

  df1 <- data.frame(x = sample[,1]) 
  df2 <- data.frame(x = sample[,2])   
  ggplot(df1, aes(x, colour = "g")) + stat_ecdf()
  +geom_step(data = df2) 
  scale_x_continuous(limits = c(0, 5000)) `

非常接近（就形状而言）但仍然不能将它们放在同一地块上。

Answer 1

用基本情节试试这个：

df1 <- data.frame(x = runif(200,1,5)) 
df2 <- data.frame(x = runif(200,3,8))

plot(ecdf(df1[,1]),pch = 1, xlim=c(0,10), main=NULL)
par(new=TRUE)        
plot(ecdf(df2[,1]),pch = 2, xlim=c(0,10), main=NULL)

两个图表现在具有相同的 xlim（尝试将其删除以查看两者叠加不正确）。 main=NULL 删除标题

结果：

我想为两个样本创建经验累积分布函数并将这些图放在同一个图中 [R]

I want to create the empirical cumulative distribution function for two samples and put the plots in the same plot [R]

r

ggplot2

cumulative-sum