Etuuksien saajat vuonna 2021

Työttömyyteen ja mataliin tuloihin liittyvien etuuksien tarve väheni tai pysyi ennallaan toisena koronavuotena 2021. Tartuntatautipäivärahan tarve sen sijaan moninkertaistui jälleen.

Työttömyyteen ja mataliin tuloihin liittyvien etuuksien tarve väheni tai pysyi ennallaan toisena koronavuotena 2021. Tartuntatautipäivärahan tarve sen sijaan moninkertaistui jälleen.

Työttömyysturvaa maksettiin vuonna 2021 yhteensä noin 356 000 henkilölle, joista yrittäjien työmarkkinatuen saajia oli 32 000. Kaikkien työttömyysturvaa saavien määrä laski edellisvuodesta 14 prosentilla. Jos yrittäjiä ei huomioida, työttömyysturvan saajia oli 12 prosenttia vähemmän kuin vuonna 2020 ja 3 prosenttia vähemmän kuin vuonna 2019. Yrittäjien työmarkkinatuen saajien määrä väheni 12 000 henkilöllä eli reilulla neljänneksellä vuodesta 2020.

Yleistä asumistukea saavien ruokakuntien määrä pysyi vuoden 2020 tasolla. Ruokakuntia oli siis myös vuonna 2021 noin 5 prosenttia enemmän kuin vuonna 2019. Tuen piiriin tulleiden uusien ruokakuntien määrä oli kuitenkin selvästi pienempi kuin vuonna 2020 ja jonkin verran pienempi kuin vuonna 2019.

Perustoimeentulotukea maksettiin vuonna 2021 yhteensä 379 000 henkilölle 268 000 kotitaloudessa. Tukea saavia kotitalouksia oli noin 20 000 ja henkilöitä noin 38 000 vähemmän kuin vuonna 2020. Siinä missä edellisvuonna tukea saavia henkilöitä ja kotitalouksia oli enemmän kuin koskaan aiemmin 2000-luvulla, oli niitä vuonna 2021 vähemmän kuin yhtenäkään niistä vuosista, jolloin tuki on ollut Kelan toimeenpantavana (v. 2017 alkaen). Varsinkin uusien tuen piiriin tulevien henkilöiden ja kotitalouksien määrä väheni huomattavasti.

Sairauspäivärahaa maksettiin 305 000 henkilölle eli noin 10 000:lle enemmän kuin vuonna 2020. Saajia oli vuonna 2021 aikalailla saman verran kuin vuonna 2019. COVID-19-diagnoosilla maksetuista sairaus- ja tartuntatautipäivärahoista voi lukea lisää Kelan tutkimusblogista.

Tartuntatautipäivärahan saajien määrä moninkertaistui, kun sitä maksettiin vuonna 2021 jo lähes 127 000 henkilölle. Saajia oli siis noin 100 000 enemmän kuin vuonna 2020.

# ensin koko taulukko, jossa verrataan vuosiin 2020 ja 2019

tturva <- tyottomyysturva %>% 
  as_tibble() %>% 
  mutate_at(c("kaikki","yrittajat","uudet","aiemmin_saaneet"), as.integer) %>% 
  filter(maakunta=="Koko maa") %>% 
  group_by(vuosi) %>% 
  mutate(ei_yrittajat=sum(uudet, aiemmin_saaneet)) %>%
  ungroup() %>% 
  select(vuosi, kaikki, uudet, aiemmin_saaneet, ei_yrittajat, yrittajat) %>% 
  pivot_longer(kaikki:yrittajat, names_to = "etuus", values_to = "lkm") %>%
  mutate(lkm = ifelse(vuosi == 2019 & etuus == "yrittajat", NA, lkm)) %>% 
  pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
         etuus=case_when(etuus=="kaikki" ~ "Työttömyysturva (kaikki saajat)",
                   etuus=="uudet" ~ "Työttömyysturva (uudet saajat)",
                   etuus=="aiemmin_saaneet" ~"Työttömyysturva (aiemmin tukea saaneet)",
                   etuus=="ei_yrittajat" ~ "Työttömyysturva (ilman yrittäjiä)",
                   etuus=="yrittajat" ~"Yrittäjien työmarkkinatuki"))

# ylat
ylat <- asumistuki %>% 
  filter(maakunta=="koko maa") %>% 
  select(vuosi, kaikki, uudet, aiemmin_saaneet) %>% 
  pivot_longer(kaikki:aiemmin_saaneet, names_to = "etuus", values_to = "lkm") %>% 
  pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
           etuus=case_when(etuus=="kaikki" ~ "Yleinen asumistuki (kaikki saajaruokakunnat)",
                   etuus=="uudet" ~ "Yleinen asumistuki (uudet saajaruokakunnat)",
                   etuus=="aiemmin_saaneet" ~"Yleinen asumistuki (aiemmin tukea saaneet ruokakunnat)"))

# totu

totu <- toimeentulotuki %>% 
  filter(maakunta=="Koko maa") %>% 
  select(-sukupuoli, -ikaryhma, -maakunta) %>% 
  pivot_longer(kaikki:aiemmin_saaneet_kotitaloudet, names_to = "etuus", values_to = "lkm") %>% 
  pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
         etuus=case_when(etuus=="kaikki" ~ "Perustoimeentulotuki (kaikki saajat)",
                   etuus=="uudet" ~ "Perustoimeentulotuki (uudet saajat)",
                   etuus=="aiemmin_saaneet" ~"Perustoimeentulotuki (aiemmin tukea saaneet)",
                   etuus=="kaikki_kotitaloudet" ~ "Perustoimeentulotuki (kaikki saajakotitaloudet)",
                   etuus=="uudet_kotitaloudet" ~"Perustoimeentulotuki (uudet saajakotitaloudet)",
                   etuus=="aiemmin_saaneet_kotitaloudet" ~"Perustoimeentulotuki (aiemmin tukea saaneet kotitaloudet"))

#sairaus- ja tartuntatautipäiväraha

saparaha <- sprahat %>% 
  filter(maakunta=="Koko maa") %>% 
  select(-sukupuoli, -ikaryhma, -maakunta, -epidemiatuki) %>% 
  pivot_longer(sairauspaivaraha:tartuntatautipaivaraha, names_to = "etuus", values_to = "lkm") %>% 
    pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
         etuus=case_when(etuus=="sairauspaivaraha" ~"Sairauspäiväraha (kaikki saajat)",
                         etuus=="tartuntatautipaivaraha" ~ "Tartuntatautipäiväraha (kaikki saajat)"))
  

# saisko tästä taulukosta kivan julkaistavat taulukon markus?


taulukko <- 
  bind_rows(tturva, ylat, totu, saparaha) %>% 
  rename("Saajien lkm, 2019"=`2019`,
          "Saajien lkm, 2020" = `2020`,
          "Saajien lkm, 2021" = `2021`) %>% 
  select(Etuus=etuus, `Saajien lkm, 2021`, `Saajien lkm, 2020`, `Saajien lkm, 2019`, `Muutos, 2020–2021 (%)`,`Muutos, 2019–2021 (%)`)


taulukko_clean <- janitor::clean_names(taulukko)

taulukko_clean %>% 
  mutate_at(.vars = c("saajien_lkm_2021","saajien_lkm_2020","saajien_lkm_2019"), as.integer) %>% 
 gt(rowname_col = "etuus") %>% 
  cols_align(
    align = "right",
    columns = c(saajien_lkm_2021,saajien_lkm_2020,saajien_lkm_2019,
                   muutos_2020_2021_percent,muutos_2019_2021_percent)) %>% 
  tab_header(title = glue("Etuuksien saajat ja saajien määrissä tapahtuneet muutokset 2019-2021")) %>% 
    tab_spanner(
    label = glue("Saajien lukumäärä"),
    columns = 2:4 
  ) %>% 
  tab_spanner(
    label = "Muutos (%)", 
    columns = 5:6
  ) %>%
  fmt_number(columns = c(saajien_lkm_2021,saajien_lkm_2020,saajien_lkm_2019), sep_mark = " ", decimals = 0) %>% 
  sub_missing(c(saajien_lkm_2019,muutos_2020_2021_percent,muutos_2019_2021_percent), missing_text = "-") %>% 
  cols_label(
    saajien_lkm_2021 = html("2021"),
    saajien_lkm_2020 = html("2020"),
    saajien_lkm_2019 = html("2019"),
    muutos_2020_2021_percent = html("2020-2021"),
    muutos_2019_2021_percent = html("2019-2021")
  )

# sit maakunnittain
maakunnittain_tt <- tyottomyysturva %>% 
  select(-sukupuoli, -ikaryhma) %>% 
  filter(!is.na(maakunta) & maakunta!="Koko maa") %>% 
  group_by(vuosi, maakunta) %>% 
  mutate(ei_yrittajat=sum(uudet, aiemmin_saaneet)) %>%
  ungroup() %>% 
  select(vuosi, maakunta, kaikki, uudet, aiemmin_saaneet, ei_yrittajat, yrittajat) %>% 
  pivot_longer(kaikki:yrittajat, names_to = "etuus", values_to = "lkm") %>% 
  pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
         etuus=case_when(etuus=="kaikki" ~ "Työttömyysturva (kaikki saajat)",
                   etuus=="uudet" ~ "Työttömyysturva (uudet saajat)",
                   etuus=="aiemmin_saaneet" ~"Työttömyysturva (aiemmin tukea saaneet)",
                   etuus=="ei_yrittajat" ~ "Työttömyysturva (ilman yrittäjiä)",
                   etuus=="yrittajat" ~"Yrittäjien työmarkkinatuki"))


maakunnittain_at <- asumistuki %>% 
  filter(maakunta!="koko maa") %>% 
  select(vuosi, maakunta, kaikki, uudet, aiemmin_saaneet) %>% 
  pivot_longer(kaikki:aiemmin_saaneet, names_to = "etuus", values_to = "lkm") %>% 
  pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
           etuus=case_when(etuus=="kaikki" ~ "Yleinen asumistuki (kaikki saajaruokakunnat)",
                   etuus=="uudet" ~ "Yleinen asumistuki (uudet saajaruokakunnat)",
                   etuus=="aiemmin_saaneet" ~"Yleinen asumistuki (aiemmin tukea saaneet ruokakunnat)"))
 
 
maakunnittain_totu <- toimeentulotuki %>% 
  filter(!is.na(maakunta) & maakunta!="Koko maa") %>% 
  select(-sukupuoli, -ikaryhma) %>% 
  pivot_longer(kaikki:aiemmin_saaneet_kotitaloudet, names_to = "etuus", values_to = "lkm") %>% 
  pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
         etuus=case_when(etuus=="kaikki" ~ "Perustoimeentulotuki (kaikki saajat)",
                   etuus=="uudet" ~ "Perustoimeentulotuki (uudet saajat)",
                   etuus=="aiemmin_saaneet" ~"Perustoimeentulotuki (aiemmin tukea saaneet)",
                   etuus=="kaikki_kotitaloudet" ~ "Perustoimeentulotuki (kaikki saajakotitaloudet)",
                   etuus=="uudet_kotitaloudet" ~"Perustoimeentulotuki (uudet saajakotitaloudet)",
                   etuus=="aiemmin_saaneet_kotitaloudet" ~"Perustoimeentulotuki (aiemmin tukea saaneet kotitaloudet"))



maakunnittain_sp <- sprahat %>% 
  filter(maakunta!="Koko maa") %>% 
  select(-sukupuoli, -ikaryhma, -epidemiatuki) %>% 
  pivot_longer(sairauspaivaraha:tartuntatautipaivaraha, names_to = "etuus", values_to = "lkm") %>% 
    pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
         etuus=case_when(etuus=="sairauspaivaraha" ~"Sairauspäiväraha (kaikki saajat)",
                         etuus=="tartuntatautipaivaraha" ~ "Tartuntatautipäiväraha (kaikki saajat)"))

# tästä ei tarvii julkaisukelpoista taulukkoa, vain omaan käyttöön
saajat_maakunnittain <- bind_rows(maakunnittain_tt, maakunnittain_at, maakunnittain_totu, maakunnittain_sp)
#rm(maakunnittain_tt, maakunnittain_at, maakunnittain_totu, maakunnittain_sp)

Saajat maakunnittain

Työttömyysturvan saajia oli kaikissa maakunnissa selvästi vähemmän kuin vuonna 2020. Kainuussa, Etelä-Savossa, Kymenlaaksossa, Pohjois- ja Etelä-Karjalassa ja Pohjois-Pohjanmaalla tuensaajia oli myös vähemmän kuin vuonna 2019. Jos yrittäjien työmarkkinatuen saajia ei oteta huomioon, saajia oli muissakin maakunnissa Uuttamaata lukuun ottamatta vähemmän kuin vuonna 2019. Uudellamaalla saajia (muita kuin yrittäjiä) oli 8 prosenttia enemmän kuin vuonna 2019.

Yrittäjien työmarkkinatuen saajia oli yli kolmanneksen edellisvuotta vähemmän Keski-Pohjanmaalla, Etelä-Savossa ja Kainuussa. Ero edellisvuoteen oli pienin Pohjois-Karjalassa, mutta sielläkin tuen saajia oli yli viidenneksen vähemmän kuin vuonna 2020. 38 prosenttia tukea saaneista yrittäjistä asui Uudellamaalla.

Perustoimeentulotukea saavia kotitalouksia oli kaikissa maakunnissa vähintään 5 prosenttia ja saajia vähintään 7 prosenttia vähemmän kuin vuonna 2020 ja Uuttamaata lukuun ottamatta myös vähemmän kuin vuonna 2019. Uudellamaalla saajakotitalouksia ja saajia oli kutakuinkin saman verran kuin vuonna 2019. Kaikissa Pohjanmaan maakunnissa ja Etelä-Savossa tukea saavia henkilöitä oli yli 12 prosenttia vähemmän kuin vuonna 2020. Suurin ero (-10,1 %) vuoteen 2019 oli Pohjois-Karjalassa.

Yleistä asumistukea saavia ruokakuntia oli hieman vuotta 2020 enemmän Uudellamaalla, Pirkanmaalla sekä Etelä- ja Pohjois-Pohjanmaalla. Muissa maakunnissa tukea saavien ruokakuntia oli edellisvuotta vähemmän. Suurin ero edellisvuoteen oli Etelä-Savossa (-5,4 %) ja Kymenlaaksossa (-4,7 %). Niissä ja Kainuussa saajia oli myös vähemmän kuin vuonna 2019. Muissa maakunnissa saajia oli vuotta 2019 enemmän.

Sairauspäivärahan saajia oli edellisvuotta enemmän muissa maakunnissa Kainuuta lukuun ottamatta. Suurin ero (+8,6 %) edellisvuoteen oli Pirkanmaalla.

Tartuntatautipäivärahaa maksettiin 46 100 Uudellamaalla, 14 100 Varsinais-Suomessa, 9 600 Pirkanmaalla asuvalle henkilölle. Myös Pohjois-Pohjanmaalla, Päijät-Hämeessä ja Pohjanmaalla oli vuonna 2021 yli 5 000 tartuntatautipäivärahan saajaa. Ainoastaan Kainuussa saajia oli alle 1 000.

# sit ikasuputtain
ikasuputtain_tt <- tyottomyysturva %>% 
  select(-maakunta) %>% 
  filter(!is.na(sukupuoli) & ikaryhma!="alle 18" & sukupuoli!="kaikki" & ikaryhma!="kaikki") %>% 
  group_by(vuosi, sukupuoli, ikaryhma) %>% 
  mutate(ei_yrittajat=sum(uudet, aiemmin_saaneet)) %>%
  ungroup() %>% 
  select(vuosi, sukupuoli, ikaryhma, kaikki, uudet, aiemmin_saaneet, ei_yrittajat, yrittajat) %>% 
  pivot_longer(kaikki:yrittajat, names_to = "etuus", values_to = "lkm") %>% 
  pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
         etuus=case_when(etuus=="kaikki" ~ "Työttömyysturva (kaikki saajat)",
                   etuus=="uudet" ~ "Työttömyysturva (uudet saajat)",
                   etuus=="aiemmin_saaneet" ~"Työttömyysturva (aiemmin tukea saaneet)",
                   etuus=="ei_yrittajat" ~ "Työttömyysturva (ilman yrittäjiä)",
                   etuus=="yrittajat" ~"Yrittäjien työmarkkinatuki"))


ikasuputtain_totu <- toimeentulotuki %>% 
  select(-maakunta,  -kaikki_kotitaloudet, -uudet_kotitaloudet, -aiemmin_saaneet_kotitaloudet) %>% 
  filter(!is.na(sukupuoli) & ikaryhma!="alle 18" & sukupuoli!="kaikki" & ikaryhma!="kaikki") %>% 
  pivot_longer(kaikki:aiemmin_saaneet, names_to = "etuus", values_to = "lkm") %>% 
  pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
         etuus=case_when(etuus=="kaikki" ~ "Perustoimeentulotuki (kaikki saajat)",
                   etuus=="uudet" ~ "Perustoimeentulotuki (uudet saajat)",
                   etuus=="aiemmin_saaneet" ~"Perustoimeentulotuki (aiemmin tukea saaneet)"))



ikasuputtain_sp <- sprahat %>% 
  select(-maakunta, -epidemiatuki) %>% 
    filter(!is.na(sukupuoli) & ikaryhma!="alle 18" & sukupuoli!="kaikki" & ikaryhma!="kaikki") %>% 
  pivot_longer(sairauspaivaraha:tartuntatautipaivaraha, names_to = "etuus", values_to = "lkm") %>% 
    pivot_wider(names_from = vuosi, values_from = lkm) %>% 
  mutate(`Muutos, 2020–2021 (%)` = round((`2021`-`2020`)/`2020`*100,1),
         `Muutos, 2019–2021 (%)` = round((`2021`-`2019`)/`2019`*100,1),
         etuus=case_when(etuus=="sairauspaivaraha" ~"Sairauspäiväraha (kaikki saajat)",
                         etuus=="tartuntatautipaivaraha" ~ "Tartuntatautipäiväraha (kaikki saajat)"))

# tästä ei tarvii julkaisukelpoista taulukkoa, vain omaan käyttöön
saajat_ikasuputtain <- bind_rows(ikasuputtain_tt, ikasuputtain_totu, ikasuputtain_sp)
#rm(ikasuputtain_tt, ikasuputtain_totu, ikasuputtain_sp)

#rm(asumistuki, data1, data2, saparaha, totu, tturva, tyottomyysturva, ylat, sprahat, toimeentulotuki)

Saajat iän ja sukupuolen mukaan

Työttömyysturvan saajia oli kaikissa ryhmissä vähemmän kuin vuonna 2020 ja nuorimmassa ikäryhmässä myös vähemmän kuin vuonna 2019. Vanhinta ikäryhmää lukuun ottamatta saajia oli vähintään 10 prosenttia – ja 18–24-vuotiaiden naisten osalta jopa 27 prosenttia – edellisvuotta vähemmän. Jos yrittäjiä ei huomioida, työttömyysetuutta maksettiin vuonna 2021 pienemmälle joukolle kuin vuonna 2019 kaikissa muissa ikäryhmissä paitsi 25–44-vuotiaiden miesten ryhmissä.

Yrittäjien työmarkkinatuen saajia oli kaikissa ryhmissä vuotta 2020 vähemmän. Ero edellisvuoden saajamäärään oli sitä suurempi, mitä nuorempi ikäryhmä oli kyseessä. Esimerkiksi 18–24-vuotiaiden yrittäjien työmarkkinatukea saaneiden naisten määrä lähes puolittui, kun taas yli 54-vuotiaiden tukea saaneiden yrittäjänaisten määrä laski vain noin viidenneksellä.

Perustoimeentulotuen saajia oli niin ikään kaikissa ryhmissä vähemmän kuin vuonna 2020 ja ainoastaan 35–44-vuotiaiden miesten ryhmässä enemmän kuin vuonna 2019. Suurin ero (yli -10 %) edellisvuoteen oli 18–24-vuotiaiden miesten sekä 18–34-vuotiaiden naisten ryhmissä.

Sairauspäivärahan saajia oli kaikissa ryhmissä edellisvuotta enemmän. 45–54-vuotiaiden ryhmässä ero oli alle prosentin ja 18–34-vuotiaiden naisten joukossa yli 10 prosenttia. Vuoteen 2019 verrattuna sairauspäivärahan saajia oli enemmän kaikissa 18–44-vuotiaiden naisten sekä 25–34-vuotiaiden miesten ryhmissä.

Tartuntatautipäivärahan saajien suurin joukko pysyi edellisvuoden kaltaisena. Päivärahaa maksettiin erityisesti 35–44-vuotiaille naisille (19 500 saajaa), 25–34-vuotiaille naisille (17 300 saajaa) ja miehille (17 000 saajaa) sekä 35–44-vuotiaille miehille (16 500). Myös 45–54-vuotiaita päivärahaa saaneita miehiä ja naisia oli molempia 11 000.