library(ggplot2)
ggplot(Data.Obesitas.Fixx,aes(x=Height, y=Weight)) + geom_point() + geom_smooth(method = lm, se = F) +
scale_x_continuous(breaks = seq(0.00, 1.99, by = 0.05)) + scale_y_continuous(breaks = seq(20, 180, by = 10))## `geom_smooth()` using formula = 'y ~ x'