Talvivaaran kaivoksen terveysvaikutukset

Rajaus

Kysymys

Mitkä ovat Talvivaaran kaivoksen terveysvaikutukset?

Rajaus

Arviointi on tekninen harjoitelma arviointimenetelmän testaamiseen, eikä se sisällä mitään todellista tietoa Talvivaaran kaivoksesta (ainakaan vielä).

Vastaus

Koodi

Voit laskea terveysvaikutukset alla olevalla laskentamallilla. Toistaiseksi malli laskee vasta joitakin päästöjä.

+ Näytä koodi- Piilota koodi

cat("Valmistellaan laskentaa.\n")

library(OpasnetBaseUtils)
library(xtable)

akt <- tidy(op_baseGetData("opasnet_base", "Op_fi2811"))
i <- 1:max(as.numeric(akt$Nro))
M <- as.numeric(akt[akt$Havainto == "määrä" & akt$Nro %in% i, "Result"])
kosteus <- akt[akt$Havainto == "Kosteus" & akt$Nro %in% i, "Result"]
vaim <- c("Materiaalin kastelu", "Hihnan kotelointi, sykloni", "Hihnan kotelointi, harjaus", "Hihnan kotelointi, kangassuodattimet", "suljettu tai maanalainen", "Sähköstaattinen suodatus")
temp <- akt[akt$Havainto == "Vaimennusprosessit" & akt$Nro %in% i, "Result"]
vaimennus <- list(i)

for(j in i) {
vaimennus[[j]] <- vaim[as.numeric(strsplit(temp[j], ",")[[1]])]
}

murskaus <- akt[akt$Havainto == "Prosessi" & akt$Nro %in% i, "Result"]

out <- pölypäästö(page = "Op_fi2806", M, A, murskaus, kosteus, vaimennus)
cat(paste("Pölypäästöt (kg/d) prosessista, kun prosessoidaan ", max(M * A), " tonnia päivässä.\n", sep=""))

print(xtable(out), type = 'html')

print(xtable(as.data.frame(as.table(tapply(out$Result, out$Hiukkaskoko, sum)))), type = 'html')

Perustelut

Prosessitiedot

Kaivoksessa ovat käytössä seuraavat prosessit. Tiedot annetaan prosessoitavan syötteen määrinä per tunti tilanteessa, jossa prosessi on käynnissä. Aktiviteettituntien määrä kysytään erikseen.

Mahdolliset päästön vaimennusprosessit. Ota kantaa jokaiseen vaimennusprosessiin: onko se käytössä vai ei kyseisessä toimintaprosessissa. Listaa kaikkien käytössä olevien vaimennusprosessien numerot taulukkoon, esim. "1, 3, 4" tarkoittaa että käytössä ovat materiaalin kastelu, hihnan kotelointi ja harjaus sekä hihnan kotelointi ja kangassuodattimet.

1. Materiaalin kastelu
2. Hihnan kotelointi, sykloni
3. Hihnan kotelointi, harjaus
4. Hihnan kotelointi, kangassuodattimet
5. suljettu tai maanalainen
6. Sähköstaattinen suodatus

Katso myös

Viitteet

Aiheeseen liittyviä tiedostoja