Práca s údajmi

Popis zadania

V rámci tejto úlohy budem spracovávať časovú databázu o inflácii, nezamestnanosti a úrokových sadzbách v krajinách EÚ.

Cieľom bude analyzovať, ako sa tieto makroekonomické ukazovatele vyvíjali v období 2010–2023, a zistiť ich vzájomné vzťahy pomocou korelačnej a regresnej analýzy.

Databáza obsahuje makroekonomické ukazovatele pre jednotlivé krajiny sveta v období 2010–2023.

Údaje sú zoradené podľa krajiny (Country) a roku (Year).

Medzi premenné patria:

Premenná Popis Jednotka
Country Názov krajiny
Year Rok (2010–2023) rok
Inflation.Rate Miera inflácie %
Unemployment.Rate Miera nezamestnanosti %
Interest.Rate Úroková sadzba %
GDP.Growth Rast HDP %

Práca s údajmi v R

1. Import údajov

install.packages("tidyverse")
library(tidyverse)
library(kableExtra)

Načítanie dát z Kaggle (po stiahnutí do priečinka “data”)

udaje <- read.csv("economic_indicators_dataset_2010_2023.csv", header = TRUE, sep = ",", dec = ".")

Kontrola štruktúry dát

str(udaje)
head(udaje)

2. Úprava a čistenie dát

Prehľad názvov stĺpcov

colnames(udaje)

Premenovanie, ak by obsahovali medzery

colnames(udaje) <- make.names(colnames(udaje))

Výber najdôležitejších premenných

udaje <- udaje %>%
  select(Country, Year, Inflation.Rate, Unemployment.Rate, Interest.Rate, GDP.Growth)

Kontrola chýbajúcich hodnôt

colSums(is.na(udaje))

Odstránenie riadkov s NA

udaje <- na.omit(udaje)
LS0tCnRpdGxlOiAiUHLDoWNhIHMgZGF0YWLDoXpvdSIKYXV0aG9yOiAiWXVsaWlhIEx5c3l0c2lhIgpkYXRlOiAiT2t0w7NiZXIgMjAyNSIKb3V0cHV0OgogaHRtbF9ub3RlYm9vazoKICAgdG9jOiB0cnVlCiAgIHRvY19mbG9hdDogdHJ1ZQogICB0aGVtZTogdW5pdGVkCiAgIGhpZ2hsaWdodDogdGFuZ28KZWRpdG9yX29wdGlvbnM6CiBtYXJrZG93bjoKICAgd3JhcDogNzIKLS0tCmBgYHtyIHNldHVwLCBpbmNsdWRlPUZBTFNFfQprbml0cjo6b3B0c19jaHVuayRzZXQoCiBlY2hvID0gVFJVRSwKIG1lc3NhZ2UgPSBGQUxTRSwKIHdhcm5pbmcgPSBGQUxTRQopCmBgYAojIFByw6FjYSBzIMO6ZGFqbWkKIyMgUG9waXMgemFkYW5pYQojIyMjIFYgcsOhbWNpIHRlanRvIMO6bG9oeSBidWRlbSBzcHJhY292w6F2YcWlIMSNYXNvdsO6IGRhdGFiw6F6dSBvIGluZmzDoWNpaSwgbmV6YW1lc3RuYW5vc3RpIGEgw7pyb2tvdsO9Y2ggc2FkemLDoWNoIHYga3Jhamluw6FjaCBFw5ouCiMjIyMgQ2llxL5vbSBidWRlIGFuYWx5em92YcWlLCBha28gc2EgdGlldG8gbWFrcm9la29ub21pY2vDqSB1a2F6b3ZhdGVsZSB2eXbDrWphbGkgdiBvYmRvYsOtIDIwMTDigJMyMDIzLCBhIHppc3RpxaUgaWNoIHZ6w6Fqb21uw6kgdnrFpWFoeSBwb21vY291IGtvcmVsYcSNbmVqIGEgcmVncmVzbmVqIGFuYWzDvXp5LgojIyMjIMOaZGFqZSBwbMOhbnVqZW0gc3RpYWhudcWlIHogS2FnZ2xlIOKAkyBrb25rcsOpdG5lIGRhdGFzZXQ6IGh0dHBzOi8vd3d3LmthZ2dsZS5jb20vZGF0YXNldHMvaGVpZGFybWlyaGFqaXNhZGF0aS9nbG9iYWwtZWNvbm9taWMtaW5kaWNhdG9ycy1kYXRhc2V0LTIwMTAtMjAyM0NoYXJha3RlcmlzdGlrYSDDumRham92CgojIyMgRGF0YWLDoXphIG9ic2FodWplIG1ha3JvZWtvbm9taWNrw6kgdWthem92YXRlbGUgcHJlIGplZG5vdGxpdsOpIGtyYWppbnkgc3ZldGEgdiBvYmRvYsOtIDIwMTDigJMyMDIzLgojIyMjIMOaZGFqZSBzw7ogem9yYWRlbsOpIHBvZMS+YSBrcmFqaW55IChDb3VudHJ5KSBhIHJva3UgKFllYXIpLgojIyMjIE1lZHppIHByZW1lbm7DqSBwYXRyaWE6CgoKfFByZW1lbm7DoSAgICAgICAgICB8UG9waXMgICAgICAgICAgICAgICAgIHwgSmVkbm90a2EgfAp8Oi0tLS0tLS0tLS0tLS0tLS0tfDotLS0tLS0tLS0tLS0tLS0tLS0tLS18Oi0tLS0tLS0tOnwKfENvdW50cnkgICAgICAgICAgIHxOw6F6b3Yga3JhamlueSAgICAgICAgIHwgICAg4oCTICAgICB8CnxZZWFyICAgICAgICAgICAgICB8Um9rICgyMDEw4oCTMjAyMykgICAgICAgfCAgIHJvayAgICB8CnxJbmZsYXRpb24uUmF0ZSAgICB8TWllcmEgaW5mbMOhY2llICAgICAgICB8ICAgICUgICAgIHwKfFVuZW1wbG95bWVudC5SYXRlIHxNaWVyYSBuZXphbWVzdG5hbm9zdGkgfCAgICAlICAgICB8CnxJbnRlcmVzdC5SYXRlICAgICB8w5pyb2tvdsOhIHNhZHpiYSAgICAgICAgfCAgICAlICAgICB8CnxHRFAuR3Jvd3RoICAgICAgICB8UmFzdCBIRFAgICAgICAgICAgICAgIHwgICAgJSAgICAgfAoKIyMjIFByw6FjYSBzIMO6ZGFqbWkgdiBSCiMjIyMgMS4gSW1wb3J0IMO6ZGFqb3YKYGBge3J9Cmluc3RhbGwucGFja2FnZXMoInRpZHl2ZXJzZSIpCmxpYnJhcnkodGlkeXZlcnNlKQpsaWJyYXJ5KGthYmxlRXh0cmEpCmBgYAoKIyMjIyBOYcSNw610YW5pZSBkw6F0IHogS2FnZ2xlIChwbyBzdGlhaG51dMOtIGRvIHByaWXEjWlua2EgImRhdGEiKQpgYGB7cn0KdWRhamUgPC0gcmVhZC5jc3YoImVjb25vbWljX2luZGljYXRvcnNfZGF0YXNldF8yMDEwXzIwMjMuY3N2IiwgaGVhZGVyID0gVFJVRSwgc2VwID0gIiwiLCBkZWMgPSAiLiIpCmBgYAoKIyMjIyBLb250cm9sYSDFoXRydWt0w7pyeSBkw6F0CmBgYHtyfQpzdHIodWRhamUpCmhlYWQodWRhamUpCmBgYAoKIyMjIyAyLiDDmnByYXZhIGEgxI1pc3RlbmllIGTDoXQKIyMjIyBQcmVoxL5hZCBuw6F6dm92IHN0xLpwY292CmBgYHtyfQpjb2xuYW1lcyh1ZGFqZSkKYGBgCgojIyMjIFByZW1lbm92YW5pZSwgYWsgYnkgb2JzYWhvdmFsaSBtZWR6ZXJ5CmBgYHtyfQpjb2xuYW1lcyh1ZGFqZSkgPC0gbWFrZS5uYW1lcyhjb2xuYW1lcyh1ZGFqZSkpCmBgYAoKIyMjIyBWw71iZXIgbmFqZMO0bGXFvml0ZWrFocOtY2ggcHJlbWVubsO9Y2gKYGBge3J9CnVkYWplIDwtIHVkYWplICU+JQogIHNlbGVjdChDb3VudHJ5LCBZZWFyLCBJbmZsYXRpb24uUmF0ZSwgVW5lbXBsb3ltZW50LlJhdGUsIEludGVyZXN0LlJhdGUsIEdEUC5Hcm93dGgpCmBgYAoKIyMjIyBLb250cm9sYSBjaMO9YmFqw7pjaWNoIGhvZG7DtHQKYGBge3J9CmNvbFN1bXMoaXMubmEodWRhamUpKQpgYGAKCiMjIyMgT2RzdHLDoW5lbmllIHJpYWRrb3YgcyBOQQpgYGB7cn0KdWRhamUgPC0gbmEub21pdCh1ZGFqZSkKYGBgCg==