Ero sivun ”Kysely kuntatuesta sote-uudistuksessa” versioiden välillä
Siirry navigaatioon
Siirry hakuun
(kysely siirretty sivulta Keskustelu:Kuntatuki sote-uudistuksen toimeenpanossa) |
(THL poistettu) |
||
(Yhtä välissä olevaa versiota samalta käyttäjältä ei näytetä) | |||
Rivi 1: | Rivi 1: | ||
Tämä oli kaikille avoin, vuonna 2014 toteutettu kysely kuntien terveyden ja hyvinvoinnin edistämisen sekä eriarvoisuuden kaventamisen tuesta erityisesti liittyen sote-uudistuksen toimeenpanoon. Lue aiheesta lisää sivulta [[Kuntatuki sote-uudistuksen toimeenpanossa]]. | |||
<rcode embed=0 label="Vastaa kyselyyn" showcode=-1 variables=" | <rcode embed=0 label="Vastaa kyselyyn" showcode=-1 variables=" | ||
Rivi 163: | Rivi 161: | ||
# ggplot(dat[dat$Kysymys == "Rokotevertailuperusteet" , ], aes(x = Result)) + geom_bar() + theme_gray(base_size = 24) + coord_flip() + labs(title=paste("Rokotevertailuperusteet")) | # ggplot(dat[dat$Kysymys == "Rokotevertailuperusteet" , ], aes(x = Result)) + geom_bar() + theme_gray(base_size = 24) + coord_flip() + labs(title=paste("Rokotevertailuperusteet")) | ||
#oprint(dat, include.rownames = FALSE) | #oprint(dat, include.rownames = FALSE) | ||
dat <- reshape(dat, idvar = "KyselyID", timevar = "Kysymys", v.names = "Result", direction = "wide") | |||
colnames(dat) <- gsub("Result.", "", colnames(dat)) | |||
oprint(dat) | |||
</rcode> | </rcode> |
Nykyinen versio 11. joulukuuta 2019 kello 16.50
Tämä oli kaikille avoin, vuonna 2014 toteutettu kysely kuntien terveyden ja hyvinvoinnin edistämisen sekä eriarvoisuuden kaventamisen tuesta erityisesti liittyen sote-uudistuksen toimeenpanoon. Lue aiheesta lisää sivulta Kuntatuki sote-uudistuksen toimeenpanossa.