Use of computers and the internet by employees

Από τη βάση δεδομένων της Eurostat βρείτε δεδομένα σχετικά με Use of computers and the internet by employees και απομονώστε τα δεδομένα σχετικά με :

1. indicator: Persons employed using computers 2. unit : Percentage of total employment 3. enterprice size: όποιο θέλετε εσείς Και κάντε το εξής: 1. Βρείτε τις χώρες της EE με το μικρότερο και μεγαλύτερο ποσοστό 2. Απεικονίστε το δεδομένα σε χάρτη
library(tidyverse)
library(eurostat)
library(sf)

DAT <- get_eurostat("isoc_ci_cm_pn2", time_format = "num")

DAT 
DAT %>% distinct(indic_is)
DAT %>% distinct(unit)
DAT %>% distinct(sizen_r2)

SHP <- get_eurostat_geospatial(nuts_level = 0, resolution = 10) %>% 
  select(geo = NUTS_ID, geometry)

DF <- DAT %>% 
  filter(is.na(values) == FALSE) %>% 
  filter(indic_is == 'P_CUSE') %>% 
  filter(unit == 'PC_EMP') %>% 
  filter(sizen_r2 == 'S_C10_S951_XK') %>% 
  group_by(geo) %>% 
  filter(time == max(time)) %>% 
  ungroup()

DF %>% 
  filter(values == min(values)) 
DF %>% 
  filter(values == max(values))


DF %>% 
  inner_join(SHP, by = "geo") %>% 
  st_as_sf() %>% 
  ggplot(aes(fill = values)) +
  geom_sf() +
  xlim(-10.0, 38.0) + 
  ylim(35.5, 66.0) +
  scale_fill_continuous(type = "viridis") +
  theme_void()

Συνδεθείτε για περισσότερες δυνατότητες αλληλεπίδρασης,
σχολιασμοί, εξωτερικοί σύνδεσμοι, βοήθεια, ψηφοφορίες, αρχεία, κτλ.

Creative Commons License
Εκπαιδευτικό υλικό από τον Αθανάσιο Σταυρακούδη σας παρέχετε κάτω από την άδεια Creative Commons Attribution-NonCommercial-ShareAlike 4.0 License.
Σας παρακαλώ να ενημερωθείτε για κάποιους επιπλέον περιορισμούς
http://stavrakoudis.econ.uoi.gr/stavrakoudis/?iid=401.