Rename elements of a list

Question

I am creating a large list pulling variables from a dataframe. Here is an example:

df <- data.frame (A-Imp = c(4,8,2,4,3),
      A-Rea = c(4,4,5,6,7),