How to fix “'x' and 'y' lengths differ” error when trying to create a line of best fit on scatter plot in R

Question

Learning to use R with my own dataset for the first time. I am trying to add a line of best fit to a scatter plot (That is created fine)

I have the following code: