Here is an example of making a scatter plot with a loess curve. I invented some simple data to use in the plot.
#Invent data
DF <- data.frame(Xval = 1:20, Yval = rnorm(20))
library(ggplot2)
ggplot(data = DF, mapping = aes(x = Xval, y = Yval)) +
geom_point() + geom_smooth(formula = y ~ x, method = "loess")

Created on 2022-07-05 by the reprex package (v2.0.1)