Why is R^2 in linear regression affected by scale of x axis in ggplot2

Question

So I\'m doing simple linear regression, plotting, and adding the equation + R^2 to the graph. I\'m having issues with varying R^2 values. This is my code - also, please excu