title: drc:: drc plot with ggplot2
body: <p>I'm trying to reproduce <code>drc</code> plots with <code>ggplot2</code>. Here is my first attempt (MWE is given below). However, my ggplot2 is little bit different from base R plot. I wonder if I am missing something here?</p>
  
  <pre><code>library(drc)
  chickweed.m1 &lt;- drm(count~start+end, data = chickweed, fct = LL.3(), type = "event")
  
  plot(chickweed.m1, xlab = "Time (hours)", ylab = "Proportion germinated", 
  xlim=c(0, 340), ylim=c(0, 0.25), log="", lwd=2, cex=1.2)  
  </code></pre>
  
  <p><a href="https://i.stack.imgur.com/cjPp9.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/cjPp9.png" alt="enter image description here"></a></p>
  
  <pre><code>library(data.table)
  dt1 &lt;- data.table(chickweed)
  
  dt1Means1 &lt;- dt1[, .(Germinated=mean(count)/200), by=.(start)]
  dt1Means2 &lt;- dt1Means1[, .(start=start, Germinated=cumsum(Germinated))]
  dt1Means  &lt;- data.table(dt1Means2[start!=0], Pred=predict(object=chickweed.m1))
  
  library(ggplot2)
  ggplot(data= dt1Means, mapping=aes(x=start, y=Germinated)) + 
      geom_point() +
      geom_line(aes(y = Pred)) +
      lims(y=c(0, 0.25)) +
      theme_bw()
  </code></pre>
  
  <p><a href="https://i.stack.imgur.com/ioG9t.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/ioG9t.png" alt="enter image description here"></a></p>
  
  <p><strong>Edited</strong></p>
  
  <p>I followed the methodology (with some changes) given <a href="https://stackoverflow.com/a/37043751/707145">here</a>. </p>