R - lm predict function outputting questionnable results - is there an obvious error?

Question

I have a regression model called pm2 which is fit to DF A1. I have a dataframe A2 on which I have used the predict function to try and estimate future freq. However, the out