I loaded ggplot2, tidyverse. I import the data. These were the codes I ran

data<- read.csv("who_data.csv")

head (data)

ggplot(data, aes(x = Year, y = Life.expectancy)) +

geom_point() + scale_x_log10()+

geom_smooth()

ggplot(data, aes(x = Year, y = BMI)) +

geom_point() + scale_x_log10()+

geom_smooth()

ggplot(data, aes(x = Year, y = Schooling)) +

geom_point() + scale_x_log10()+

geom_smooth()

What did I miss? What did I do wrong?

Please help