How to create a combined grouped barplot and linechart in ggplot2

Question

I have the following dataframe which I\'ve used to create a grouped barchart in ggplot2

dataframe <- structure(list(Period = structure(c(1L, 2L, 3