title: How to plot a combined bar and line plot in ggplot2
body: <p>I have the following data which I am trying to plot as combined bar and line plot (with CI)</p>
  
  <p>A data frame of Feature, Count, Odds Ratio and Confidence Interval values for OR
  <img src="https://i.stack.imgur.com/NMblt.png" alt="A data frame of Feature, Count, Odds Ratio and Confidence Interval values for OR"></p>
  
  <p>I am trying to get a plot as
  A bar plot for count over lapped with a line plot for Odds Ratio with CI bars</p>
  
  <p><a href="https://i.stack.imgur.com/NM7zO.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/NM7zO.png" alt="A bar plot for count over lapped with a line plot for Odds Ratio with CI bars"></a></p>
  
  <p>I tried to plot in ggplot2 using following code:</p>
  
  <pre><code>ggplot(feat)+
    geom_bar(aes(x=Feat, y=Count),stat="identity", fill = "steelblue") +
    geom_line(aes(x=Feat, y=OR*max(feat$Count)),stat="identity", group = 1) +
    geom_point(aes(x=Feat, y=OR*max(feat$Count))) +
    geom_errorbar(aes(x=Feat, ymin=CI1, ymax=CI2), width=.1, colour="orange", 
                  position = position_dodge(0.05))
  </code></pre>
  
  <p>However, I am not getting the CI bars for the line graph, as can be seen in pic: Rather, I am getting them for barplot 
  <img src="https://i.stack.imgur.com/tYgjo.png" alt="Rather, I am getting them for barplot"></p>
  
  <p>Can someone can please help me out to sort this issue.</p>
  
  <p>Thanks</p>
  
  <p>Edit - Dput: </p>
  
  <pre><code>df &lt;- structure(list(Feat = structure(1:8, .Label = c("A", "B", "C", 
  "D", "E", "F", "G", "H"), class = "factor"), Count = structure(c(2L, 
  8L, 7L, 5L, 4L, 1L, 6L, 3L), .Label = c("13", "145", "2", "25", 
  "26", "3", "37", "43"), class = "factor"), OR = structure(c(4L, 
  2L, 1L, 5L, 3L, 7L, 6L, 8L), .Label = c("0.38", "1.24", "1.33", 
  "1.51", "1.91", "2.08", "2.27", "3.58"), class = "factor"), CI1 = structure(c(7L, 
  4L, 1L, 6L, 3L, 5L, 2L, 2L), .Label = c("0.26", "0.43", "0.85", 
  "0.89", "1.2", "1.24", "1.25"), class = "factor"), CI2 = structure(c(3L, 
  2L, 1L, 6L, 4L, 7L, 8L, 5L), .Label = c("0.53", "1.7", "1.82", 
  "1.98", "13.07", "2.83", "3.92", "6.13"), class = "factor")), class = "data.frame", row.names = c(NA, 
  -8L))
  </code></pre>