title: geom_smooth, stat_smooth confidence interval not working?
body: <p>I have these data:</p>
  
  <pre><code>structure(list(Run = c("A013", "A015", "A023", "A024", "A031", 
  "A032", "A035", "A040", "A045", "A046", "A049", "A013", "A015", 
  "A023", "A024", "A031", "A032", "A035", "A040", "A045", "A046", 
  "A013", "A015", "A023", "A024", "A031", "A032", "A035", "A040", 
  "A013", "A015", "A023", "A024", "A031", "A032", "A035", "A040", 
  "A013", "A015", "A023", "A024", "A031", "A032", "A013", "A015", 
  "A023", "A024", "A013", "A015", "A023", "A024"), Step = structure(c(1L, 
  1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 
  2L, 2L, 2L, 2L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 4L, 4L, 4L, 4L, 
  4L, 4L, 4L, 4L, 5L, 5L, 5L, 5L, 5L, 5L, 6L, 6L, 6L, 6L, 7L, 7L, 
  7L, 7L), .Label = c("1", "e", "k", "2", "q", "b", "m"), class = "factor"), 
      Weight = c(87.4064, 79.5822, 117.0674, 102.6384, 134.0752, 
      111.2398, 107.8464, 111.2576, 104.2428, 110.2848, 28.7292, 
      41.65656, 73.9356, 84.18504, 89.4845, 71.55106, 86.04072, 
      76.27296, 92.8749, 85.203, 91.92112, 39.5009258, 58.6035081, 
      75.13589946, 83.43157667, 88.8993795, 68.85183559, 64.77081269, 
      77.56733054, 32.5025, 51.45329, 66.29101, 73.79125, 79.95483, 
      60.9573, 58.34856, 68.83193, 29.65289, 40.74267, 56.97243, 
      61.48708, 70.24226, 54.79253, 22.8231064, 38.9966088, 55.2736576, 
      62.6077916, 20.7458048, 38.306526, 54.7937568, 61.1417148
      )), .Names = c("Run", "Step", "Weight"), row.names = c(NA, 
  -51L), class = "data.frame")
  </code></pre>
  
  <p>I'm trying to get a nice looking geom_smooth() with 0.99 confidence using</p>
  
  <pre><code>require(ggplot2)
  require(directlabels)
  g1 &lt;- ggplot(m1,
               aes(x=Step,y=Weight,label=Run,group=Run,color=Run)) + 
    geom_point() + geom_line()
  g2 &lt;- g1 +  geom_dl(method="first.bumpup")
  g2 + geom_smooth(aes(group=1),level=0.99)
  </code></pre>
  
  <p>Here are my problems:</p>
  
  <ol>
  <li><p>The error ribbon doesn't look like 99% confidence, lots of points in the chart are outside it.</p></li>
  <li><p>When I expand the data set, the error ribbon collapses to very narrow where the majority of the points are outside it.</p></li>
  </ol>
  
  <p>Am I doing something wrong here?
  Thanks,</p>
  
  <p>Edit: here's what I see when I run this:
  <img src="https://i.stack.imgur.com/3WtAi.png" alt="Narrow ribbon">
  When I look at a bigger data set, the ribbon gets even narrower, almost being on top of the smooth line.</p>