Ero sivun ”Tiedosto:Ympäristöterveysindikaattorit.pptx” versioiden välillä

Opasnet Suomista
Siirry navigaatioon Siirry hakuun
({{luento|moderaattori=Jouni}} Esitys '''ympäristöterveyden indikaattoreista''', esitetty ensimmäisenä tiistaiseminaarisarjassa 11.9.2018 Neulasessa.)
 
(datat kuvaan 3)
Rivi 1: Rivi 1:
{{luento|moderaattori=Jouni}}
{{luento|moderaattori=Jouni}}
Esitys '''ympäristöterveyden indikaattoreista''', esitetty ensimmäisenä tiistaiseminaarisarjassa 11.9.2018 Neulasessa.
Esitys '''ympäristöterveyden indikaattoreista''', esitetty ensimmäisenä tiistaiseminaarisarjassa 11.9.2018 Neulasessa. Esitys on tehty alunperin [https://docs.google.com/presentation/d/131IUalICT_fLsh8_oa2EY_rDG8HQkDfEypf-Zs9-kbg/edit# Google Drivessa].
 
Keksitty data ja koodi kuvaan 3 (nykyhetken tiedot vastaavat kutakuinkin IHME-instituutin arvioita Suomelle.
 
<pre>
Aika Vaikutus Tautitaakka
1910 Pienhiukkaset 74000
1920 Pienhiukkaset 78000
1930 Pienhiukkaset 80000
1940 Pienhiukkaset 85000
1950 Pienhiukkaset 75000
1960 Pienhiukkaset 67000
1970 Pienhiukkaset 51000
1980 Pienhiukkaset 35000
1990 Pienhiukkaset 32000
2000 Pienhiukkaset 31000
2010 Pienhiukkaset 28000
2018 Pienhiukkaset 25000
1910 Tuhkarokko 10000
1920 Tuhkarokko 11000
1930 Tuhkarokko 12000
1940 Tuhkarokko 18000
1950 Tuhkarokko 14000
1960 Tuhkarokko 13500
1970 Tuhkarokko 7000
1980 Tuhkarokko 300
1990 Tuhkarokko 30
2000 Tuhkarokko 20
2010 Tuhkarokko 20
2018 Tuhkarokko 14
1910 Vesi- ja ruokavälitteiset epidemiat 1100
1920 Vesi- ja ruokavälitteiset epidemiat 1400
1930 Vesi- ja ruokavälitteiset epidemiat 1200
1940 Vesi- ja ruokavälitteiset epidemiat 1300
1950 Vesi- ja ruokavälitteiset epidemiat 900
1960 Vesi- ja ruokavälitteiset epidemiat 300
1970 Vesi- ja ruokavälitteiset epidemiat 150
1980 Vesi- ja ruokavälitteiset epidemiat 70
1990 Vesi- ja ruokavälitteiset epidemiat 53
2000 Vesi- ja ruokavälitteiset epidemiat 55
2010 Vesi- ja ruokavälitteiset epidemiat 50
2018 Vesi- ja ruokavälitteiset epidemiat 50
1910 Keuhkosyöpä 41000
1920 Keuhkosyöpä 42000
1930 Keuhkosyöpä 47000
1940 Keuhkosyöpä 51000
1950 Keuhkosyöpä 56000
1960 Keuhkosyöpä 55000
1970 Keuhkosyöpä 50000
1980 Keuhkosyöpä 47000
1990 Keuhkosyöpä 45000
2000 Keuhkosyöpä 41000
2010 Keuhkosyöpä 40000
2018 Keuhkosyöpä 40000
 
b <- read.csv("clipboard",sep="\t")
ggplot(b, aes(x=Aika, y=Tautitaakka, colour=Vaikutus))+geom_line()+
  geom_text(
    data=data.frame(
      x=c(1960,1975),
      y=c(70000,15000),
      text=c("Kaukolämpö","MPR-rokote"),
      Vaikutus=c("Pienhiukkaset","Tuhkarokko")
    ),
    aes(x=x, y=y, label=text, angle=90))+
  labs(title="Tautitaakka Suomessa (arvaus demonstaatiota varten)",
      y="Tautitaakka (DALY/a)"
      )+
  theme_gray(base_size=18)
</pre>

Versio 12. syyskuuta 2018 kello 10.25




Esitys ympäristöterveyden indikaattoreista, esitetty ensimmäisenä tiistaiseminaarisarjassa 11.9.2018 Neulasessa. Esitys on tehty alunperin Google Drivessa.

Keksitty data ja koodi kuvaan 3 (nykyhetken tiedot vastaavat kutakuinkin IHME-instituutin arvioita Suomelle. 

Aika	Vaikutus	Tautitaakka
1910	Pienhiukkaset	74000
1920	Pienhiukkaset	78000
1930	Pienhiukkaset	80000
1940	Pienhiukkaset	85000
1950	Pienhiukkaset	75000
1960	Pienhiukkaset	67000
1970	Pienhiukkaset	51000
1980	Pienhiukkaset	35000
1990	Pienhiukkaset	32000
2000	Pienhiukkaset	31000
2010	Pienhiukkaset	28000
2018	Pienhiukkaset	25000
1910	Tuhkarokko	10000
1920	Tuhkarokko	11000
1930	Tuhkarokko	12000
1940	Tuhkarokko	18000
1950	Tuhkarokko	14000
1960	Tuhkarokko	13500
1970	Tuhkarokko	7000
1980	Tuhkarokko	300
1990	Tuhkarokko	30
2000	Tuhkarokko	20
2010	Tuhkarokko	20
2018	Tuhkarokko	14
1910	Vesi- ja ruokavälitteiset epidemiat	1100
1920	Vesi- ja ruokavälitteiset epidemiat	1400
1930	Vesi- ja ruokavälitteiset epidemiat	1200
1940	Vesi- ja ruokavälitteiset epidemiat	1300
1950	Vesi- ja ruokavälitteiset epidemiat	900
1960	Vesi- ja ruokavälitteiset epidemiat	300
1970	Vesi- ja ruokavälitteiset epidemiat	150
1980	Vesi- ja ruokavälitteiset epidemiat	70
1990	Vesi- ja ruokavälitteiset epidemiat	53
2000	Vesi- ja ruokavälitteiset epidemiat	55
2010	Vesi- ja ruokavälitteiset epidemiat	50
2018	Vesi- ja ruokavälitteiset epidemiat	50
1910	Keuhkosyöpä	41000
1920	Keuhkosyöpä	42000
1930	Keuhkosyöpä	47000
1940	Keuhkosyöpä	51000
1950	Keuhkosyöpä	56000
1960	Keuhkosyöpä	55000
1970	Keuhkosyöpä	50000
1980	Keuhkosyöpä	47000
1990	Keuhkosyöpä	45000
2000	Keuhkosyöpä	41000
2010	Keuhkosyöpä	40000
2018	Keuhkosyöpä	40000

b <- read.csv("clipboard",sep="\t")
ggplot(b, aes(x=Aika, y=Tautitaakka, colour=Vaikutus))+geom_line()+
  geom_text(
    data=data.frame(
      x=c(1960,1975),
      y=c(70000,15000),
      text=c("Kaukolämpö","MPR-rokote"),
      Vaikutus=c("Pienhiukkaset","Tuhkarokko")
    ),
    aes(x=x, y=y, label=text, angle=90))+
  labs(title="Tautitaakka Suomessa (arvaus demonstaatiota varten)",
       y="Tautitaakka (DALY/a)"
       )+
  theme_gray(base_size=18)

Tiedoston historia

Päiväystä napsauttamalla näet, millainen tiedosto oli kyseisellä hetkellä.

PäiväysKokoKäyttäjäKommentti
nykyinen12. syyskuuta 2018 kello 10.22 (1,16 MiB)Jouni (keskustelu | muokkaukset){{luento|moderaattori=Jouni}} Esitys '''ympäristöterveyden indikaattoreista''', esitetty ensimmäisenä tiistaiseminaarisarjassa 11.9.2018 Neulasessa.

Et voi tallentaa uutta tiedostoa tämän tilalle.

Seuraava sivu käyttää tätä tiedostoa:

Noudettu kohteesta ”https://fi.opasnet.org/index.php?title=Tiedosto:Ympäristöterveysindikaattorit.pptx&oldid=35282”