Untitled

library(readr)
population_of_europe_1950_2023 <- read_csv("population-of-europe-1950-2023.csv")

## Rows: 74 Columns: 2
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## dbl (1): Years
## num (1): Population
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

head(population_of_europe_1950_2023)

Visuslize Population of Europe

# Assuming your dataset has columns 'Year' and 'Population'
library(ggplot2)

# Create a time series plot
ggplot(population_of_europe_1950_2023, aes(x = Years, y = Population)) +
  geom_line() +
  labs(title = "Population of Europe (1950-2023)",
       x = "Years",
       y = "Population") +
  theme_minimal()