How to add data values of end points on line chart and the percentage change next to the chart header?

Question

I have the following data frame (df1) and its corresponding ggplot2 line chart. My R codes stand as follows:

codes_list <- read.c