Beta
How Much of the World Has Access to the Internet?
Introduction
Objectives
This report presents the state of internet accessibility across the world by answering these specific questions:
| ㅤ 1. What are the top five (5) countries with the highest internet use (by population share)? How many people had internet access in those countries in 2019? |
| ㅤ 2. What are the top five (5) countries with the highest internet use for each of the following regions: Africa Eastern and Southern, Africa Western and Central, Latin America & Caribbean, East Asia & Pacific, South Asia, North America, and European Union? How do we describe these regions' internet usage over time? |
| ㅤ 3. What are the top five (5) countries with the most internet users? |
| ㅤ 4. What is the correlation between internet usage (population share) and broadband subscriptions for 2019? |
| ㅤ |
Data Used
The following tables were used in the analyses, which are part of The World Bank's World Development Indicators (WDI).
Acknowledgments: Max Roser, Hannah Ritchie, and Esteban Ortiz-Ospina (2015) - "Internet." OurWorldInData.org.
Internet
| Variable | Description |
|---|---|
| Entity | Name of the country, region, or group |
| Code | Unique id for the country (null for other entities) |
| Year | Year from 1990 to 2019 |
| Internet_Usage | Share of the entity's population who have used the internet in the last three months |
# View first six rows of 'internet' data set
head(internet)People
| Variable | Description |
|---|---|
| Entity | Name of the country, region, or group |
| Code | Unique id for the country (null for other entities) |
| Year | Year from 1990 to 2020 |
| Users | Number of people who have used the internet in the last three months for that country, region, or group |
# View first six rows of 'people' data set
head(people)Broadband
| Variable | Description |
|---|---|
| Entity | Name of the country, region, or group |
| Code | Unique id for the country (null for other entities) |
| Year | Year from 1998 to 2020 |
| Broadband_Subscriptions | Number of fixed subscriptions to high-speed internet at downstream speeds >= 256 kbit/s for that country, region, or group |
# View first six rows of 'broadband' data set
head(broadband)Results and Discussion
Countries with the highest internet use by population share
- Results show that four (4) out of the top five (5) countries with the highest internet use (by population share) are located in the Middle East, which are Bahrain, Qatar, Kuwait, and United Arab Emirates (UAE).
Note: The most recent 2019 data was used for this comparison.
## ---------- Results and Discussion
# Top 5 countries with the highest internet use by population share
top_five_in_internet_use <- top_n(ungroup(
internet %>%
group_by(Entity) %>%
filter(Year == 2019) %>%
arrange(desc(Internet_Usage))
), 5, Internet_Usage) %>%
mutate(Internet_Usage = label_percent(accuracy = 0.01)(Internet_Usage/100)) %>%
select(-c("Code", "Year")) %>%
rename(Country = Entity)
top_five_in_internet_use
for_plot_top_five <- internet %>%
filter(Entity %in% top_five_in_internet_use$Country) %>%
rename(`Internet Usage (in %)` = Internet_Usage,
Country = Entity)
# Visualization in ggplot
internet %>% filter(Entity %in% top_five_in_internet_use$Country) %>%
ggplot(aes(x = Year,
y = Internet_Usage,
group = Entity)) +
geom_line(aes(color = Entity),
linewidth = 0.65) +
geom_point(aes(color = Entity),
size = 0) +
theme(legend.position = "top",
legend.justification=-0.12,
legend.direction="horizontal",
legend.key.size = unit(0, 'pt'),
legend.text = element_text(margin = margin(r = 5, unit = "pt"),
color = "#65707C",
family="sans serif"),
legend.title = element_blank(),
legend.key=element_blank(),
axis.title = element_text(color = "#65707C",
face="bold",
family="sans serif"),
axis.text = element_text(color = "#65707C",
family="sans serif"),
axis.line = element_line(colour = "grey",
size = 0.5),
panel.grid.major = element_line(color = "grey",
linetype="dashed",
size=0.25),
panel.background = element_blank(),
plot.title = element_text(color = "#65707C",
hjust = -0.8,
size= 9.5,
family = "sans serif")) +
labs(x = 'Year', y = 'Internet Usage (in %)',
color = 'Country') +
ggtitle("Internet Usage Over Time of Top Five Countries with the Highest Internet Usage in 2019") +
scale_x_continuous(expand = c(0.02, 0),
limits = c(1990, 2022),
breaks = seq(1990, 2022, by = 4)) +
scale_y_continuous(expand = c(0, 0),
limits = c(0, 100),
breaks = seq(0, 100, by = 10)) +
scale_color_manual(values = c("#443A83", "#31688E", "#21918D", "#35B779", "#8FD744")) +
guides(color = guide_legend(override.aes = list(
shape = 15,
size = 4,
linetype = "blank")))Current Type: Line
Current X-axis: Year
Current Y-axis: Internet Usage (in %)
Current Color: Country
Internet Usage Over Time of Top Five Countries with the Highest Internet Usage in 2019
Number of people that had internet access for these countries in 2019
- Among these countries, UAE had the highest number of internet users in 2019.
Hidden code