Informatyka ekonomiczna - laboratorium

¹ Zakład Bioinformatyki, Instytut Informatyki, Uniwersytet w Białymstoku

^✉ Correspondence: Jarosław Kotowicz <j.kotowicz@uwb.edu.pl>

1 Książki i inne rzeczy

1. R for Data Science
2. ggplot2: Elegant Graphics for Data Analysis
3. Colors in R
4. Modyfikowanie wyglądu rysunku theme
5. Strona eurostat

2 Praca z ggplot2 (utrwalenie umiejętności)

Wykonaj następujące polecenie

1. Wykorzystując ściągę ze strony wykonaj modyfikacje 1 lub 2 rysunków z pracy domowej z poprzednich zajęć, aby stał się bardziej czytelny.

3 Bazy danych ekonomicznych po raz pierwszy

3.1 Urząd statystyczny eurostat

Na początku zapozna się z informacją na stronie A Guide to Getting International Statistics into R.

Eurostat to Urząd Statystyczny Unii Europejskiej odpowiedzialny za publikacje wysokiej jakości europejskich statystyk i wskaźników, które umożliwiają porównywanie krajów i regionów.

1. Wejdź na stronę eurostat i ją sobie obejrzyj.
2. Wejdź na strone RStudio Cheat Sheets i odszukaj pomoc dotyczącą biblioteki eurostat.
3. Zapoznaj się z pomocą do biblioteki eurostat EuroStat Cheat Sheet.
4. Zainstaluj bibliotekę eurostat.
5. Wykorzystując cheat sheet zaobacz jak, działają polecenia z tej biblioteki takie, jak:

• eu_countries,
• get_eurostat_toc,
• search_eurostat,
• get_eurostat,
• get_eurostat_dic,
• itp.

6. Możesz skorzystać ze starego tutorala lub tego ze strony.
7. Wykonaj następujace polecenia w swoim pliku skryptowym

rm(list = ls())

library(tidyverse)

-- Attaching packages --------------------------------------- tidyverse 1.3.0 --
<U+221A> ggplot2 3.3.0     <U+221A> purrr   0.3.3
<U+221A> tibble  2.1.3     <U+221A> dplyr   0.8.4
<U+221A> tidyr   1.0.2     <U+221A> stringr 1.4.0
<U+221A> readr   1.3.1     <U+221A> forcats 0.5.0
-- Conflicts ------------------------------------------ tidyverse_conflicts() --
x dplyr::filter() masks stats::filter()
x dplyr::lag()    masks stats::lag()

library(lubridate)

library(eurostat)

library(DT)

tabela.danych <- get_eurostat_toc()

tabela.danych %>% datatable

It seems your data is too big for client-side DataTables. You may consider server-side processing: https://rstudio.github.io/DT/server.htmlIt seems your data is too big for client-side DataTables. You may consider server-side processing: https://rstudio.github.io/DT/server.html

wynik.education <- search_eurostat("education")

wynik.education %>% head()

wynik.population <- search_eurostat("Population")

wynik.population %>% head(8)

Proszę obejrzeć zebrane dane. Zobaczymy co jest w 6 wierszu.

wynik.population[6,]

Proszę obejrzeć zebrane dane. Zobaczymy co jest w 25 wierszu.

wynik.population.06 <- get_eurostat(wynik.population[6,2])

trying URL 'https://ec.europa.eu/eurostat/estat-navtree-portlet-prod/BulkDownloadListing?sort=1&file=data%2Fdemo_r_pjanind2.tsv.gz'
Content type 'application/octet-stream;charset=UTF-8' length 604613 bytes (590 KB)
downloaded 590 KB

Table demo_r_pjanind2 cached at C:\Users\user\AppData\Local\Temp\Rtmpwzsuja/eurostat/demo_r_pjanind2_date_code_TF.rds

wynik.population.06 %>% 
  filter(str_detect(geo, "PL")) %>%
  datatable

It seems your data is too big for client-side DataTables. You may consider server-side processing: https://rstudio.github.io/DT/server.htmlIt seems your data is too big for client-side DataTables. You may consider server-side processing: https://rstudio.github.io/DT/server.html

8. Plik skryptowy (rozszerzenie R) ze wszystkimi poleceniami prześlij w terminie do 31 marca br.

W razie pytań oorszę o kontak e-mailowy lub przez Skype (użytkownik: jkotowicz.informatyka).

4 Praca domowa z dnia 24 marca 2020r.

Używając biblioteki eurostat zaimportuj rysunki wykonane w poprzedniej pracy domowej, tak aby stały się czytelne. Wykorzystać różne predefiniowane tematy. Termin przesłania 7 kwietnia br.

Uwaga.

Nazwa pliku i tytuł e-maila ze skryptem z laboratorium i z pracą domową powinieny być zgodny ze następującym schematem NumerAlbumu_Nazwisko_PDxx lub NumerAlbumu_Nazwisko_Labxx, gdzie xx onacza numer pracy domowej lub zajęć laboratorium. Pracę domową i skrypt z laboratorium wysyłają Państwo oddzielnie!

.