Combining Bar and Line chart (double axis) in ggplot2

by

First, scale Rate by Rate*max(df$Response) and modify the 0.9 scale of Response text.

Second, include a second axis via scale_y_continuous(sec.axis=...):

ggplot(df)  + 
    geom_bar(aes(x=Year, y=Response),stat="identity", fill="tan1", colour="sienna3")+
    geom_line(aes(x=Year, y=Rate*max(df$Response)),stat="identity")+
    geom_text(aes(label=Rate, x=Year, y=Rate*max(df$Response)), colour="black")+
    geom_text(aes(label=Response, x=Year, y=0.95*Response), colour="black")+
    scale_y_continuous(sec.axis = sec_axis(~./max(df$Response)))

Which yields:

enter image description here

More Related Contents:

  1. Multirow axis labels with nested grouping variables
  2. Position geom_text on dodged barplot
  3. Put stars on ggplot barplots and boxplots – to indicate the level of significance (p-value)
  4. Stacked Bar Plot in R
  5. Reverse stacked bar order
  6. How to put labels over geom_bar for each bar in R with ggplot2
  7. Grouped bar plot in ggplot
  8. How can I change the Y-axis figures into percentages in a barplot?
  9. How to center stacked percent barchart labels
  10. Plotting bar charts on map using ggplot2?
  11. How to produce stacked bars within grouped barchart in R [duplicate]
  12. How can I add hatches, stripes or another pattern or texture to a barplot in ggplot?
  13. Missing legend with ggplot2 and geom_line
  14. Grouped barplot in R with error bars
  15. draw the sum value above the stacked bar in ggplot2
  16. ggplot2 3D Bar Plot
  17. Plotting a stacked bar plot?
  18. R ggplot2: stat_count() must not be used with a y aesthetic error in Bar graph
  19. ggplot2 : Plot mean with geom_bar
  20. Group data and plot multiple lines
  21. How to align the bars of a histogram with the x axis?
  22. How to plot a Stacked and grouped bar chart in ggplot?
  23. Add percentage labels to a stacked barplot
  24. ggplot2: Setting geom_bar baseline to 1 instead of zero
  25. Bars in geom_bar have unwanted different widths when using facet_wrap
  26. ggplot multiple grouping bar
  27. Drawing a barchart to compare two sets of data using ggplot2 package?
  28. How to order bars within all facets?
  29. Bar plot, no space between bottom of geom and x axis keep space above
  30. How to get a barplot with several variables side by side grouped by a factor

Leave a Comment