Not a major issue, but my regression line appears slightly jagged, see below

Is there anything that I can do about this or is this just the way it is in R?
ggplot(dataset, aes(x=`Broadband Subs (%)`, y=`2019 FDI ($m)`)) +
geom_point(size=2, shape=16, color="blue") +
geom_smooth(method='lm',formula=y~x, se=FALSE, color='red', size=1.1) +
scale_y_continuous(label = comma) +
theme(panel.background = element_rect(fill="peachpuff"),
plot.background = element_rect(fill="peachpuff")) +
theme(panel.grid.major = element_line(colour = "gray72"),
panel.grid.minor = element_line(colour = "gray72")) +
theme(text = element_text(family = "Cam"), plot.title = element_text(hjust = 1/2)) +
labs(x="Fixed Broadband Subscriptions (per 100 People)", y="Foreign Direct Investment ($m)",
title="Foreign Direct Investment and Internet Access (2019)")