Ero sivun ”Energiarenessanssi” versioiden välillä

Opasnet Suomista
Siirry navigaatioon Siirry hakuun
 
(20 välissä olevaa versiota samalta käyttäjältä ei näytetä)
Rivi 1: Rivi 1:
[[Luokka:Ilmasto]]
[[Luokka:Helsinki]]
{{arviointi|moderaattori=Jouni|status=ongoing}}
{{arviointi|moderaattori=Jouni|status=ongoing}}
'''Energiarenessanssi''' on Helsingin kaupungin toimenpideohjelma, jolla pyritään edistämään rakenusten (erityisesti muiden kuin Helsingin kaupungin omassa omistuksessa olevien) energiaparannuksia muiden korjausten yhteydessä.


== Kysymys ==
== Rajaus ==


'''Energiarenessanssin''' kysymys on kaksitasoinen.
=== Kysymys ===
* Millaisia toimenpiteitä Helsingin kaupungissa pitäisi tehdä, jotta päästäisiin tavoitteeseen hiilineutraalista kaupungista vuoteen 2050 mennessä?
 
* Millä tavalla energiarenessanssiin liittyvää tietoa pitäisi jäsentää, jotta se tuottaisi [[jaettu ymmärrys|jaettua ymmärrystä]] aiheesta ja hyödyntäisi [[jaetun ymmärryksen menetelmä]]ä?
# Millaisia toimenpiteitä Helsingin kaupungissa pitäisi tehdä (mukaanlukien mutta ei rajautuen [[Hiilineutraali Helsinki 2035]] -toimenpideohjelman toimenpiteisiin), jotta kaupungin rakennuskanta saataisiin mahdollisimman energiatehokkaaksi nopeasti?
# Miten toimenpiteiden toteutumista ja vaikutuksia seurataan osana toimenpideohjelmaa?


=== Oletettu käyttö ja käyttäjät ===
=== Oletettu käyttö ja käyttäjät ===
Rivi 14: Rivi 18:


* Jouni Tuomisto [[THL]], arvioinnin vetäjä
* Jouni Tuomisto [[THL]], arvioinnin vetäjä
* Helsingin kaupungin ympäristökeskus, ongelmanomistaja. (Jari Viinanen, Petteri Huuska, Mira Jarkko, Timo Kuusiola, Sonja-Maria Ignatius)
* Helsingin kaupungin ympäristökeskus, ongelmanomistaja. (Jari Viinanen, Petteri Huuska, Mira Jarkko, Sonja-Maria Ignatius)


=== Rajaus ===
=== Rajaus ===


Arviointi rajataan aluksi melko suppeaksi, koska työn tekemiseen on vain niukasti resursseja. Rajaus tehdään vasta, kun nähdään millaista materiaalia ja tarpeita alkaa kertyä.
Tarkasteltavana ovat lämmityksen ilmastopäästöt ja kustannukset vuoteen 2035 asti.


=== Vaihtoehdot ===
=== Vaihtoehdot ===


Toistaiseksi ei ole tunnistettu selkeitä vaihtoehtoja.
Tarkasteluun otetaan HNH2035-ohjelman neljä toimenpidettä.


=== Aikataulu ja toteutus ===
=== Aikataulu ja toteutus ===


Työ alkaa lokakuussa 2016 ja jatkuu pienellä liekillä 2017 puolelle. Jatko riippuu hankkeen alkuvaiheen onnistumisesta ja mahdollisen ulkopuolisen rahoituksen saamisesta.
Työ on osa HNH2035-ohjelman toimeenpanoa ja toimii kokeiluna ohjelman laajemmalle toteutukselle.  
 
Alkuvaiheen keskeinen työ on koota tälle sivulle tietoa, raportteja ja näkemyksiä liittyen energiarenessanssiin. Ympäristökeskus lähettää niitä Jounille, joka rakentaa niistä systemaattista kuvausta. Tämä kuvaus toimii sitten jatkokeskustelujen ja kritiikin pohjana.


== Vastaus ==
== Vastaus ==
Rivi 46: Rivi 48:
== Perustelut ==
== Perustelut ==


Mahdollisia aiheita tarkasteltavaksi
=== Riippuvuudet ===
* Energiarenessanssi {{defend|# |Tämä valittiin kiinnostavimpana ja ajankohtaisimpana.|--[[Käyttäjä:Jouni|Jouni Tuomisto]] ([[Keskustelu käyttäjästä:Jouni|keskustelu]]) 12. lokakuuta 2016 kello 14.50 (UTC)}}
 
* Kaupunkibulevardit
<t2b name="Parametreja" index="Konteksti,Kohde,Mittari,Aika,Skenaario,Unit" obs="Tulos" desc="Kuvaus,Perustelut" unit="useita">
* Ruuhkamaksu: Millaisia arvot ja mielikuvat ovat ja mistä ne tulevat
||||BAU||||
* Keskuspuisto / yleiskaava
||||HNH2035||||
* Pysäköintipolitiikka / parkkipaikkanormi
||||toteuma||||
||||varaus||||
lämpö|rakennuksen omistaja|lämmityskorjausten marginaalikustannus|1990||€/kWh/a|0.02|korjausrakentamisen yksikkökustannus säästettyä lämpöenergiaa kohti olettaen 25 a investointien pitoajaksi|HNH-arvion mukaan hyöty on 0.5 €/kWh 25 vuoden ajan, jolloin hyöty on 0.02 €/kWh/a
paikallissähkö|Helsingin kaupunkiorganisaatio|sähköinvestointien ominaiskustannus|1990||€/Wp|1|aurinkosähköjärjestelmän investoinnin yksikkökustannus käyttöiän eli 25 a ajalta|
paikallissähkö|Helsingin kaupunkiorganisaatio|sähkön ominaistuotanto|1990||kWh/Wp/a|0.9|aurinkosähköjärjestelmän vuosittainen yksikkötuotanto|
paikallissähkö|Helsingin kaupunkiorganisaatio|sähkön ylläpidon ominaiskustannus|1990||€/MWh|4.9|kunnossapidon yksikkökustannus energiantuotantoa kohti|
|sähkön tuottaja|sähkön ominaistuotto|1990||€/kWh|0.17||
</t2b>
 
<t2b name="Malliriippuvuudet" index="Name,Ident,label,type,Description,Child" obs="Page" unit="-">
renovationIncrCost|Op_fi5642/heat|lämmityskorjausten marginaalikustannus||||
powerSpecInvestCost|Op_fi5642/power|sähköinvestointien ominaiskustannus||||
powerSpecProd|Op_fi5642/power|sähkön ominaistuotanto||||
powerSpecMaintCost|Op_fi5642/power|sähkön ylläpidon ominaiskustannus||||
powerCapac|Op_fi5642/master|sähkötehopotentiaali||||
powerProd|Op_fi5642/impacts|sähköntuotanto||||
powerCost|Op_fi5642/impacts|sähkökustannus||||
timeLimits|Op_fi5642/timeLimits|aikarajat|indeksi|||
powerSpecIncome|Op_fi5642/power|sähkön ominaistuotto||||
powerIncome|Op_fi5642/impacts|sähkötuotto||||
profit|Op_fi5642/impacts|voitto||||
</t2b>
 
=== Laskenta ===
 
Näin lasket energiarenessanssin vaikutukset:
# Päivitä seurantatiedot [https://docs.google.com/spreadsheets/d/1nCJwaFQ2PEcPhJ2jnfGJSj1JK36KczGObuLNxKBSFfw/edit#gid=1394410144 Google-taulukkoon]
# Kerää ja varastoi masterdata koodilla sivulla [[Hiilineutraali Helsinki 2035#Kerää_ja_varastoi_masterdata]]
# Aja alla oleva koodi nimeltään "Aja malli"
# Jos laskentaa pitää päivittää, se todennäköisesti pitää tehdä Aja malli -koodin jälkeen tuleviin koodeihin, koska siinä on laskennan ydin.
 
Olioiden nimeäminen tehdään camelCasea käyttäen siten, että ensimmäinen sana kertoo aiheena olevan ilmiön, ja sen jälkeen annetaan tarkentavia määreitä sille, mikä tämä nimenomainen ovariable on. Näitä määreitä käytetään:
* Incr: incremental eli marginaali- (kuvaa skenaarioiden välistä eroa eikä kokonaisvaikutusta)
* Spec: specific eli ominais- (kuvaa ominaisuutta volyymin suhteen eli esim. €/ton)
* Tot: total eli kokonais- (kuvaa ominaisuuden koko määrää eli esim. kokonaiskustannus €)
* Capac: capacity eli kapasiteetti (kuvaa toiminnan käytettävissä olevaa määrää)
* Maint: maintenance eli ylläpito- (kuvaa jatkuvaa kustannusta tms. per vuosi)
* Invest: investment eli hankinta- (kuvaa kertaluontoista investoinnin kustannusta tms. hankkeen elinkaaren aikana)
* Cost: cost eli kustannus
* Prod: production eli tuotanto
* Cons: consumption eli kulutus
* er: energy renaissance eli energiarenessanssi (a subproject of hnh)
* hnh: Climate Neutral Helsinki 2035 eli hiilinautraali Helsinki 2035 -ohjelma
* Master: masterdata seurantatiedoista
* Param: parameters eli parametrit (pysyvät, ei-tapauskohtaiset muuttujat)
 
'''Energiarenessanssimallin malliajot:
* Ajo 20.10.2018 sisältäen ensimmäisiä lämmönkulutuksen ja paikallissähkön tietoja [http://fi.opasnet.org/fi-opwiki/index.php?title=Toiminnot:RTools&id=tUvlqgC85NMFfBFj]
 
<rcode label="Aja malli" embed=0 graphics=1>
# This is code Op_fi5642/ on page [[Energiarenessanssi]]
library(OpasnetUtils)
library(ggplot2)
 
objects.latest("Op_fi5642", code_name="impacts")
 
profit <- EvalOutput(profit)
heatGhgEmis<-EvalOutput(heatGhgEmis)
heatCost <- EvalOutput(heatCost)
BS <- 24
 
tmp <- oapply(profit, cols="Iter", FUN=mean)@output
tmp$Time <- as.numeric(as.character(tmp$Time))
ggplot(tmp, aes(x=Time, y=profitResult, colour=Skenaario))+geom_line()+
  theme_gray(base_size=BS)+
  labs(
    title="Paikallissähkön tuotannosta syntyvä voitto",
    y = "Voitto (Meur/a)"
  )
 
tmp <- oapply(powerProd, cols="Iter", FUN=mean)@output
tmp$Time <- as.numeric(as.character(tmp$Time))
ggplot(tmp, aes(x=Time, y=powerProdResult, colour=Skenaario))+geom_line()+
  theme_gray(base_size=BS)+
  labs(
    title="Paikallissähkön tuotanto",
    y="Tuotanto (GWh/a)"
  )
 
tmp <- oapply(heatCost, cols="Iter", FUN=mean)@output
tmp$Time <- as.numeric(as.character(tmp$Time))
ggplot(tmp, aes(x=Time, y=heatCostResult, colour=Skenaario))+geom_line()+
  theme_gray(base_size=BS)+
  labs(
    title="Rakennuskannan korjaus- ja investointikustannukset",
    y="Kustannukset (Meur/a)"
  )
 
tmp <- oapply(heatGhgEmis, cols="Iter", FUN=mean)@output
tmp$Time <- as.numeric(as.character(tmp$Time))
ggplot(tmp, aes(x=Time, y=heatGhgEmisResult, colour=Skenaario))+geom_line()+
  theme_gray(base_size=BS)+
  labs(
    title="Lämmityksen ilmastopäästö",
    y="Ilmastopäästö (kton/a)"
  )
 
ggplot(tmp, aes(x=Time, y=cumsum(heatGhgEmisResult), colour=Skenaario))+geom_line()+
  theme_gray(base_size=BS)+
  labs(
    title="Lämmityksen kumulatiivinen ilmastopäästö",
    y="Ilmastopäästö (kton)"
  )
</rcode>
 
<rcode name="timing" label="Alusta funktio timing (vain kehittäjille)" embed=1>
# This is code Op_fi5642/timing on page [[Energiarenessanssi]]
library(OpasnetUtils)
 
#' timing fills empty Result cells with the previous value along Time index, or default if not available.
#' @param ova an ovariable with index Time. If Time does not exist, returns the ovariable
#' @param timeline numeric vector, typically calendar years
#' @default value of Result if previous or current Results are not available
 
timing <- function(ova, timeline, default=0) {
  if(!"Time" %in% colnames(ova@output)) return(ova)
  rescol <- paste0(ova@name, "Result")
  margcol <- setdiff(colnames(ova@output)[ova@marginal],"Time")
  out <- data.frame()
  tmp <- unique(ova@output[margcol])
  tmp$prev <- default
  for(i in timeline) {
    tmp <- merge(tmp, ova@output[ova$Time==i,c(margcol,rescol)], by=margcol, all.x=TRUE)
    tmp$best <- ifelse(!is.na(tmp[[rescol]]), tmp[[rescol]], tmp$prev)
    tmp$prev <- ifelse(is.na(tmp[[rescol]]),tmp$prev,tmp[[rescol]])
    tmp[[rescol]] <- NULL
    out <- rbind(out, cbind(Time=i, tmp))
  }
  out$prev <- NULL
  colnames(out)[colnames(out)=="best"] <- rescol
  ova@output <- out
  return(ova)
}
 
objects.store(timing)
cat("Function timing stored.\n")
</rcode>
 
<rcode name="erParam" label="Alusta ovariable erParam (vain kehittäjille)" embed=1>
# This is code Op_fi5642/heat on page [[Energiarenessanssi]]
library(OpasnetUtils)
 
erParam <- Ovariable(
  "erParam",
  dependencies = data.frame(
    Name=c("timing","timeline"),
    Ident=c("Op_fi5642/timing","Op_fi5642/timeline")
  ),
  formula = function(...) {
    tmp <- EvalOutput(Ovariable("tmp", ddata = "Op_fi5642", subset="Parametreja"))
    colnames(tmp@output)[colnames(tmp@output)=="Aika"] <- "Time"
    tmp$tmpSource <- NULL
    tmp$Määre <- NULL
    tmp$Konteksti <- NULL # Remove until a standardised way to use it has been developed
    tmp$Kohde <- NULL # Remove until a standardised way to use it has been developed
    levels(tmp$Skenaario)[levels(tmp$Skenaario)==""] <- NA
    tmp@output <- fillna(tmp@output, "Skenaario")
    return(timing(tmp, timeline))
  }
)
 
objects.store(erParam)
cat("Ovariable erParam stored.\n")
</rcode>
 
<rcode name="heat" label="Alusta lämmöntuotannon muuttujat (vain kehittäjille)" embed=1>
# This is code Op_fi5642/heat on page [[Energiarenessanssi]]
 
library(OpasnetUtils)
 
renovationIncrCost <- Ovariable(
  "renovationIncrCost",
  dependencies = data.frame(Name="erParam", Ident="Op_fi5642/erParam"),
  formula = function(...) {
    return(erParam[erParam$Mittari == "lämmityskorjausten marginaalikustannus", colnames(erParam@output) != "Mittari"])
  }
)
 
heatCost <- Ovariable(
  "heatCost",
  dependencies = data.frame(Name="hnhMaster",Ident="Op_fi5642/hnhMaster"),
  formula = function(...) {
    return(hnhMaster[hnhMaster$Mittari=="kustannus" , colnames(hnhMaster@output!="Mittari")])
  }
)
 
heatGhgEmis <- Ovariable(
  "heatGhgEmis",
  dependencies = data.frame(Name="hnhMaster",Ident="Op_fi5642/hnhMaster"),
  formula = function(...) {
    return(hnhMaster[hnhMaster$Mittari=="ilmastopäästö" , colnames(hnhMaster@output!="Mittari")])
  }
)
 
objects.store(list=setdiff(ls(), "wiki_username"))
cat("Ovariables", paste(setdiff(ls(), "wiki_username"), collapse=", "), "stored.\n")
</rcode>
 
<rcode name="power" label="Alusta paikallissähkön muuttujat (vain kehittäjille)" embed=1>
# This is code Op_fi5642/power on page [[Energiarenessanssi]]
 
library(OpasnetUtils)
 
powerSpecInvestCost <- Ovariable(
  "powerSpecCost",
  dependencies = data.frame(Name="erParam", Ident="Op_fi5642/erParam"),
  formula = function(...) {
    return(erParam[erParam$Mittari == "sähköinvestointien ominaiskustannus", colnames(erParam@output) != "Mittari"])
  }
)
 
powerSpecProd <- Ovariable(
  "powerSpecProd",
  dependencies = data.frame(Name="erParam", Ident="Op_fi5642/erParam"),
  formula = function(...) {
    return(erParam[erParam$Mittari == "sähkön ominaistuotanto", colnames(erParam@output) != "Mittari"])
  }
)
 
powerSpecMaintCost <- Ovariable(
  "powerSpecMaintCost",
  dependencies = data.frame(Name="erParam", Ident="Op_fi5642/erParam"),
  formula = function(...) {
    return(erParam[erParam$Mittari == "sähkön ylläpidon ominaiskustannus", colnames(erParam@output) != "Mittari"])
  }
)
 
powerSpecIncome <- Ovariable(
  "powerSpecIncome",
  dependencies = data.frame(Name="erParam", Ident="Op_fi5642/erParam"),
  formula = function(...) {
    return(erParam[erParam$Mittari == "sähkön ominaistuotto", colnames(erParam@output) != "Mittari"])
  }
)
 
objects.store(list=setdiff(ls(), "wiki_username"))
cat("Ovariables", paste(setdiff(ls(), "wiki_username"), collapse=", "), "stored.\n")
</rcode>
 
<rcode name="hnhMaster" label="Alusta hnhMasterdatasta saatavat seurantamuuttujat (vain kehittäjille)" embed=1>
# This is code Op_fi5642/hnhMaster on page [[Energiarenessanssi]]
 
library(OpasnetUtils)
 
hnhMaster <- Ovariable(
  "hnhMaster",
  dependencies = data.frame(
    Name = c("timing","timeline"),
    Ident = c("Op_fi5642/timing","Op_fi5642/timeline")
  ),
  formula = function(...) {
    tmp <- EvalOutput(Ovariable("tmp",ddata="Op_fi5767", subset = "Masterdata"))
    colnames(tmp@output)[colnames(tmp@output)=="Aika"] <- "Time"
    tmp$tmpSource <- NULL
    tmp$Kuvaus <- NULL
    tmp$Perustelu <- NULL
    tmp$Leima <- NULL
    tmp$Määre <- NULL # Remove until a standardised way to use it has been developed
    tmp$Oldid <- NULL # Remove until a standardised way to use it has been developed
    tmp$Konteksti <- NULL # Remove until a standardised way to use it has been developed
    tmp$Kohde <- NULL # Remove until a standardised way to use it has been developed
    tmp@output <- fillna(tmp@output, "Skenaario")
    tmp <- timing(tmp, timeline)
    return(tmp)
  }
)
 
powerCapac <- Ovariable(
  "powerCapac",
  dependencies = data.frame(Name="hnhMaster", Ident="Op_fi5642/hnhMaster"),
  formula = function(...) {
    return(hnhMaster[hnhMaster$Mittari == "sähkötehopotentiaali" , colnames(hnhMaster@output) != "Mittari"])
  }
)
 
objects.store(hnhMaster, powerCapac)
cat("Ovariables hnhMaster, powerCapac stored.\n")
</rcode>
 
<rcode name="impacts" label="Alusta vaikutusmuuttujat (vain kehittäjille)" embed=1>
# This is code Op_fi5642/impacts on page [[Energiarenessanssi]]
 
library(OpasnetUtils)
 
powerProd <- Ovariable(
  "powerProd",
  dependencies = data.frame(
    Name = c("powerSpecProd","powerCapac"),
    Ident = c("Op_fi5642/power","Op_fi5642/hnhMaster")
  ),
  formula = function(...) {
    out <- powerSpecProd * powerCapac
    return(out)
  }
)
 
powerCost <- Ovariable(
  "powerCost",
  dependencies = data.frame(
    Name = c("powerSpecProd","powerCapac","powerSpecInvestCost","powerSpecMaintCost"),
    Ident = c("Op_fi5642/power","Op_fi5642/hnhMaster","Op_fi5642/power","Op_fi5642/power")
  ),
  formula = function(...) {
    out <- powerSpecInvestCost * powerCapac + powerSpecMaintCost * powerProd / 1000 # €/MWh --> M€/GWh
    return(out) # powerSpecMaintCost has to be first converted to annual values assuming that it stays constant until a new value is given.
  }
)
 
powerIncome <- Ovariable(
  "powerIncome",
  dependencies = data.frame(
    Name=c("powerProd","powerSpecIncome"),
    Ident=c(NA,"Op_fi5642/power")
  ),
  formula = function(...) {
    out <- powerProd * powerSpecIncome
   
    return(out)
  }
)
 
profit <- Ovariable( # This contains all sources of income and cost by stakeholder
  "profit",
  dependencies = data.frame(
    Name=c("powerCost","powerIncome"),
    Ident=c(NA,"Op_fi5642/power")
  ),
  formula = function(...) {
    out <- powerIncome - powerCost
   
    return(out)
  }
)


Keskustelua
objects.store(powerProd, powerCost, powerIncome, profit)
cat("Ovariables powerProd, powerCost, powerIncome, profit stored.\n")
</rcode>
 
<rcode name="timeline" label="Alusta aikajana (vain kehittäjille)" embed=1>
# This is code Op_fi5642/timeline on page [[Energiarenessanssi]]
library(OpasnetUtils)
 
timeline <- 1990:2035 # This is used to cut an observation period from the timeline.
 
objects.store(timeline)
cat("Data.frame timeline stored.\n")
</rcode>
 
=== Jaetun ymmärryksen kuvaus ===
 
Keskustelua jaetusta ymmärryksestä
* On hyödyllistä, että ei tavoitella kohsensusta vaan kuvataan myös ristiriidat. Se auttaa ymmärtämään tilannetta.
* On hyödyllistä, että ei tavoitella kohsensusta vaan kuvataan myös ristiriidat. Se auttaa ymmärtämään tilannetta.
* Iso päätös tarvitsee tuekseen paljon sitä tukevia pieniä päätöksiä. Mikä laukaisee prosessin, jolla iso päätös saadaan aikaan? Miten tehdään politiikkaa, jolla estetään pieniä päätöksiä olemasta ison päätöksen vastaisia? Tukevatko pienet päätökset isoa päätöstä, esim. mitkä normit rajoittavat tiivistä kaupunkia?
* Iso päätös tarvitsee tuekseen paljon sitä tukevia pieniä päätöksiä. Mikä laukaisee prosessin, jolla iso päätös saadaan aikaan? Miten tehdään politiikkaa, jolla estetään pieniä päätöksiä olemasta ison päätöksen vastaisia? Tukevatko pienet päätökset isoa päätöstä, esim. mitkä normit rajoittavat tiivistä kaupunkia?
* Miten monimutkaisen asian osat liittyvät toisiinsa? Miten kuvataan tällainen järjestelmä siin, että tietokone voi ylläpitää kuvausta järjestelmästä ja tuottaa sieltä hyödyllisiä näkymiä käyttäjälle (esimerkiksi nostaa esiin johonkin yksityiskohtaan liittyviä asioita vaikka käyttäjä ei tiedä niiden liittyvän siihen)?
* Miten monimutkaisen asian osat liittyvät toisiinsa? Miten kuvataan tällainen järjestelmä siin, että tietokone voi ylläpitää kuvausta järjestelmästä ja tuottaa sieltä hyödyllisiä näkymiä käyttäjälle (esimerkiksi nostaa esiin johonkin yksityiskohtaan liittyviä asioita vaikka käyttäjä ei tiedä niiden liittyvän siihen)?


=== Jaetun ymmärryksen kuvaus ===
Tietoa jaettuun ymmärrykseen lähdettiin hakemaan useasta eri lähteestä. Alla olevista lähteistä on tarkoitus koota suoraan tai välivaiheiden kautta yksi yhteinen energia- ja ilmastokuvaus [[jaetun ymmärryksen menetelmä]]n mukaisena rdf-taulukkona, jota voidaan pilkkoa ja kuvata automaattisesti kaaviona. Joistakin taulukoiden riveistä tulee useita rivejä yhteiseen taulukkoon. Energiarenessanssin asioiden varhaisempi tietomuoto ja koodi jolla se muutettiin löytyy [http://fi.opasnet.org/fi_wiki/index.php?title=Energiarenessanssi&oldid=33435#Jaetun_ymm.C3.A4rryksen_analyysi täältä].
 
Tietoa jaettuun ymmärrykseen lähdettiin hakemaan useasta eri lähteestä. Alla olevista lähteistä on tarkoitus koota suoraan tai välivaiheiden kautta yksi yhteinen energia- ja ilmastokuvaus [[jaetun ymmärryksen menetelmä]]n mukaisena rdf-taulukkona, jota voidaan pilkkoa ja kuvata automaattisesti kaaviona. Joistakin taulukoiden riveistä tulee useita rivejä yhteiseen taulukkoon.


'''Tiedosto:Energiajailmastotekstit.txt
'''Tiedosto:Energiajailmastotekstit.txt
Rivi 68: Rivi 416:
* Suorasanaista tekstiä yleisön esittämistä toimenpide-ehdotuksista
* Suorasanaista tekstiä yleisön esittämistä toimenpide-ehdotuksista
** Kommentit: timestamp, kommentti
** Kommentit: timestamp, kommentti
* Tuote: ejikysely ja ejikomm
* Nettikyselyn päätösehdotukset on t2b sivulla [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
 
** Sarakkeet: Obs, Aihe, Toimi, Vaikutus (tämä sarake on tyhjä)
'''Nettikyselyn päätösehdotukset
** Kytkeytyvät nettikyselyn toimenpide-ehdotuksiin annetussa järjestyksessä
* t2b sivulla [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
* Kyselyn kommenttien tiedot on t2b sivulla [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
* Sarakkeet: Obs, Aihe, Toimi, Vaikutus (tämä sarake on tyhjä)
** Sarakkeet: Obs, Row, Name, Type, Note (onko kiistelty vai ei)
* Kytkeytyvät nettikyselyn toimenpide-ehdotuksiin annetussa järjestyksessä
* Koodi Op_en5339/preprocessing on page [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]] tuottaa data.framet
* Tuote: ejikysely
* '''Tuote: ejikysely ja ejikomm
 
'''Kyselyn kommenttien tiedot
* t2b sivulla [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
* Sarakkeet: Obs, Row, Name, Type, Note (onko kiistelty vai ei)
* Tuote: ejikomm
 
'''Koodi Op_en5339/preprocessing on page [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
* Lähtödata: Tiedosto:Energiajailmastotekstit.txt
* Tuote: data.framet ejikysely ja ejikomm


'''ejikysely
'''ejikysely
Rivi 101: Rivi 440:
** Subjekti: Topic; Relaatio: "tekee relevantiksi"; Objekti: Name; Tarkenne: ""; Kuvaus: ""
** Subjekti: Topic; Relaatio: "tekee relevantiksi"; Objekti: Name; Tarkenne: ""; Kuvaus: ""


'''Liikenteeseen liittyvät toimenpide-ehdotukset energia- ja ilmatostrategian luonnoksessa
'''Terveys- ja ilmastokeskustelu
* Prettytable sivulla [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
* Sarakkeet: Nro, Aihe, Toimi, Ehdotus, Puolesta, Vastaan, Kannatus
* 14 riviä toimenpiteitä liikenteeseen liittyen
* Poistetaan turhana.
 
'''Energia ja ilmasto 23.8.2016
* Osittain jäsennettyä suorasanaista tekstiä palaverista sivulla [[Keskustelu:Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
* Osittain jäsennettyä suorasanaista tekstiä palaverista sivulla [[Keskustelu:Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
* Siitä tuotettu t2b Terveys- ja ilmastokeskustelu sivulle [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]].
* Käsittelee energia- ja ilmastoasioita laajasti
* Käsittelee energia- ja ilmastoasioita laajasti
* Oliotyypit: arviointi, muuttuja, metodi
* Oliotyypit: arviointi, muuttuja, metodi
* Tuote: kuvaaja [[:Tiedosto:Jaettu ymmärrys liikenteestä energia- ja ilmastostrategiassa.png]]. Pitäisikö tuottaa myös suoraan rdf-taulukkoon rivejä?
* Tuote: kuvaaja [[:Tiedosto:Jaettu ymmärrys liikenteestä energia- ja ilmastostrategiassa.png]]. Lisäksi t2b, jossa jaetun ymmärryksen mukaiset sarakkeet.
 
'''Asiat
* t2b sivulla [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
* Asiat kuvaajasta [[:Tiedosto:Jaettu ymmärrys liikenteestä energia- ja ilmastostrategiassa.png]], johon on yhdistetty tietoja liikenteen osalta sekä keskustelusta Energia ja ilmasto 23.8.2016 että taulukosta Nettikyselyn päätösehdotukset.
* Sarakkeet: Obs, AsiaID (ei tarvita), Asia (lyhyt nimi), Tyyppi (oliotyyppi tai tyypit), Huom (onko kiistelty)
 
'''Relaatiot
* t2b sivulla [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
* Taulukon Asiat pari. Sisältää sen taulukon olioiden väliset suhteet.
* Sarakkeet: Obs, Asia 1 (ID), Relaatio, Voima, Asia 2 (ID), Tarkenne (esim. onko kiistelty)
 
'''Koodi Op_fi5339/ sivulla [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma#Jaetun ymmärryksen kuvaus]]
* Lähtödata: t2b:t Asiat ja Relaatiot
* Tuote: igrapheja. Lisäksi rivejä jaetun ymmärryksen taulukkoon. Sarakkeet:
** Subjekti: Subject; Relaatio: Relaatio; Objekti: Object; Tarkenne: Strength; Kuvaus: Note_r
** Subjekti: Subject; Relaatio: "tägi"; Objekti: Type_s; Tarkenne: ""; Kuvaus: Note_s
** Subjekti: Object; Relaatio: "tägi"; Objekti: Type_o; Tarkenne: ""; Kuvaus: Note_o


'''Robottiautot ja matkojenyhdistely
'''Robottiautot ja matkojenyhdistely
* t2b sivulla [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma#Robottiautot ja matkojenyhdistely]]
* t2b sivulla [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma#Robottiautot ja matkojenyhdistely]]
* Sarakkeet: Obs, Subjekti, Predikaatti, Objekti, Tarkenne, Kuvaus
* Sarakkeet: Obs, Subjekti, Predikaatti, Objekti, Tarkenne, Kuvaus
* Tuotteen sarakkeet käyvät sellaisenaan, Obsia ei tarvita.
* Tuotteen sarakkeet käyvät jaettuun ymmärrykseen sellaisenaan, Obsia ei tarvita.


'''Ohjelmatason tavoitteenmäärittelyt
'''Ohjelmatason tavoitteenmäärittelyt {{attack|# |Ei tarvita ainakaan vielä. Tavoitehierarkia pitää miettiä uudestaan, jos siihentyöhn lähdetään.|--[[Käyttäjä:Jouni|Jouni Tuomisto]] ([[Keskustelu käyttäjästä:Jouni|keskustelu]]) 28. marraskuuta 2016 kello 20.34 (UTC)}}
* prettytable sivulta [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet#Ohjelmatason tavoitteet]]
* prettytable sivulta [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet#Ohjelmatason tavoitteet]]
* Sarakkeet: Nro, Aineisto (käytetty aineisto), Sivunumero (aineiston sivu), Osa-alue (aihealue), Tavoite (ilmastopoliittinen tavoite), Relaatio (käytännössä "tukee"), Strategiatason tavoite (ylätason tavoite)
* Sarakkeet: Nro, Aineisto (käytetty aineisto), Sivunumero (aineiston sivu), Osa-alue (aihealue), Tavoite (ilmastopoliittinen tavoite), Relaatio (käytännössä "tukee"), Strategiatason tavoite (ylätason tavoite)
Rivi 143: Rivi 460:
** Subjekti: Tavoite; Relaatio: "tägi"; Objekti: "tavoite"; Tarkenne: "", Kuvaus: ""
** Subjekti: Tavoite; Relaatio: "tägi"; Objekti: "tavoite"; Tarkenne: "", Kuvaus: ""


'''Ilmastopäästöt
'''Ilmastopäästöt {{attack|# |Ei oteta käyttöön vielä.|--[[Käyttäjä:Jouni|Jouni Tuomisto]] ([[Keskustelu käyttäjästä:Jouni|keskustelu]]) 29. marraskuuta 2016 kello 10.36 (UTC)}}
* t2b sivulta [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet#Tarkasteltavat vaikutukset]]
* t2b sivulta [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet#Tarkasteltavat vaikutukset]]
* Sarakkeet: Obs, Vaikutus (nimi toiminnan ilmastopäästölle; muuttujatyypin olio), Yksikkö (mittayksikkö), Luku (Result), Kuvaus
* Sarakkeet: Obs, Vaikutus (nimi toiminnan ilmastopäästölle; muuttujatyypin olio), Yksikkö (mittayksikkö), Luku (Result), Kuvaus
Rivi 149: Rivi 466:
** Subjekti: Vaikutus; Relaatio: "ovariablen vastaus"; Objekti: Luku; Tarkenne: ["yksikkö"; Yksikkö;; ./ "viite";"VIITE PUUTTUU";;]; Kuvaus: Kuvaus
** Subjekti: Vaikutus; Relaatio: "ovariablen vastaus"; Objekti: Luku; Tarkenne: ["yksikkö"; Yksikkö;; ./ "viite";"VIITE PUUTTUU";;]; Kuvaus: Kuvaus


'''Kustannukset
'''Kustannukset {{attack|# |EI oteta käyttöön vielä.|--[[Käyttäjä:Jouni|Jouni Tuomisto]] ([[Keskustelu käyttäjästä:Jouni|keskustelu]]) 29. marraskuuta 2016 kello 10.36 (UTC)}}
* t2b sivulta [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet#Eräiden toimenpiteiden kustannustehokkuus]]
* t2b sivulta [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet#Eräiden toimenpiteiden kustannustehokkuus]]
* Sarakkeet: Obs, Toimenpide (nimi toimepiteelle, päätöstyypin olio), Kustannukset (M€/a), Päästövähenemä (ktonCO2), Nro (Viittaa Obs-sarakkeeseen taulukossa Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet)
* Sarakkeet: Obs, Toimenpide (nimi toimepiteelle, päätöstyypin olio), Kustannukset (M€/a), Päästövähenemä (ktonCO2), Nro (Viittaa Obs-sarakkeeseen taulukossa Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet)
Rivi 170: Rivi 487:
** Subjekti: Tavoite; Relaatio: "kuuluu joukkoon"; Objekti: Osa-alue; Tarkenne: ["viite";paste(Aineisto, Sivunumero);; ./ "jae";Jaenumero;;]; Kuvaus: ""
** Subjekti: Tavoite; Relaatio: "kuuluu joukkoon"; Objekti: Osa-alue; Tarkenne: ["viite";paste(Aineisto, Sivunumero);; ./ "jae";Jaenumero;;]; Kuvaus: ""
** Subjekti: Tavoite; Relaatio: "tägi"; Objekti: "tavoite"; Tarkenne: "", Kuvaus: Kuvaus
** Subjekti: Tavoite; Relaatio: "tägi"; Objekti: "tavoite"; Tarkenne: "", Kuvaus: Kuvaus
'''Helsinki energy decision 2015
* Muuttujat kuvasta [http://en.opasnet.org/w/File:Helsinki_energy_decision_2015.png]


'''Energiarenessanssin asioita
'''Energiarenessanssin asioita
* t2b sivulta [[Energiarenessanssi#Jaetun ymmärryksen kuvaus]]
* t2b sivulta [[Energiarenessanssi#Jaetun ymmärryksen kuvaus]]
* Sarakkeet: Obs, Aihe, Asia, Tyyppi (yleensä "muuttuja"), Kuvaus (pitkä kuvaus), Huom (kommentteja sisällöstä; tämän voisi yhdistää Kuvaukseen)
* Sisältää muuttujia kuvasta Helsinki energy decision 2015 [http://en.opasnet.org/w/File:Helsinki_energy_decision_2015.png]
 
* Sarakkeet sopivat suoraan jaetun ymmärryksen kuvaukseen.
'''Energiarenessanssin relaatiot
* t2b sivulta [[Energiarenessanssi#Jaetun ymmärryksen kuvaus]]
* Sarakkeet: Obs, Subjekti (ID), Relaatio, Voima (esim. "lisäävästi"), Objekti, Tarkenne (nyt tyhjä), Kuvaus
 
'''Koodi Op_fi5642/ on page [[Energiarenessanssi]]
* t2b:t Asioita ja Relaatiot sivulta [[Energiarenessanssi]] sekä "Tavoitteet") # [[Helsingin strategiset energiatehokkuus- ja ilmastotavoitteet]] ja  # [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet]]
* Tuotteen sarakkeet:
** Subjekti: Subject; Relaatio: Relation; Objekti: Object; Tarkenne: Strength; Kuvaus: Desc_r
** Subjekti: Subject; Relaatio: "tägi"; Objekti: Type_s; Tarkenne: Note_s?; Kuvaus: Desc_s
** Subjekti: Subject; Relaatio: "kuuluu joukkoon"; Objekti: Topic_s; Tarkenne: ""; Kuvaus: Note_s?
** Subjekti: Object; Relaatio: "tägi"; Objekti: Type_o; Tarkenne: Note_o?; Kuvaus: Desc_o
** Subjekti: Object; Relaatio: "kuuluu joukkoon"; Objekti: Topic_o; Tarkenne: ""; Kuvaus: Note_o? {{attack|# |Nyt puuttuu Note_r. Tarvitaanko?|--[[Käyttäjä:Jouni|Jouni Tuomisto]] ([[Keskustelu käyttäjästä:Jouni|keskustelu]]) 27. marraskuuta 2016 kello 15.42 (UTC)}}


{{piilotettu|
{{piilotettu|


<t2b name="Energiarenessanssin asioita" index="Aihe,Asia,Tyyppi,Kuvaus" obs="Huom" unit="-">
<t2b name="Energiarenessanssin asioita" index="Subjekti,Predikaatti,Objekti,Tarkenne" obs="Kuvaus" unit="-">
Rakennuskanta|Rakennuskanta nyt|muuttuja|Rakennuskannan suuruus rakennustyypeittäin neliömetreinä nyt (perustuen tilastoihin)|
Rakennuskanta nyt|tägi|muuttuja||Rakennuskannan suuruus rakennustyypeittäin neliömetreinä nyt (perustuen tilastoihin)  
Rakennuskanta|Rakennuskannan suuruus|muuttuja|Rakennuskannan suuruus neliömetreinä eri vuosina (myös tulevaisuuden ennuste)|
Rakennuskannan suuruus|tägi|muuttuja||Rakennuskannan suuruus neliömetreinä eri vuosina (myös tulevaisuuden ennuste)  
Rakennuskanta|Korjausrakentaminen|muuttuja|Korjausrakentamisen määrä %/a rakennustyypeittäin|
Korjausrakentaminen|tägi|muuttuja||Korjausrakentamisen määrä %/a rakennustyypeittäin  
Rakennuskanta|Korjausrakentamisen tyyppi|muuttuja|Korjausrakentamisen tyyppi (kuinka laaja remontti ja kuinka suuret energiavaikutukset) silloini kun remontti tehdään (%-osuus remonteista)|
Korjausrakentamisen tyyppi|tägi|muuttuja||Korjausrakentamisen tyyppi (kuinka laaja remontti ja kuinka suuret energiavaikutukset) silloini kun remontti tehdään (%-osuus remonteista)  
Rakennuskanta|Uudisrakentaminen ja purkaminen|muuttuja|Uudisrakentamisen ja purkamisen määrä rakennustyypeittäin ja vuosittain (rakennus-m2/a)|
Uudisrakentaminen ja purkaminen|tägi|muuttuja||Uudisrakentamisen ja purkamisen määrä rakennustyypeittäin ja vuosittain (rakennus-m2/a)  
Rakennuskanta|Lämmitysmuoto ja energiatehokkuus|muuttuja|Eri lämmitysmuodon ja energiatehokkuuden jakaumat erityyppisissä ja -ikäisissä rakennuksissa (%-osuus rakennuskannasta)|
Lämmitysmuoto ja energiatehokkuus|tägi|muuttuja||Eri lämmitysmuodon ja energiatehokkuuden jakaumat erityyppisissä ja -ikäisissä rakennuksissa (%-osuus rakennuskannasta)  
Rakennuskanta|Lämmön ominaiskulutus|muuttuja|Rakennuksen lämmönkulutus laskettuna rakennuspinta-alaa kohti erityyppisissä rakennuksissa (W/m2/K)|
Lämmön ominaiskulutus|tägi|muuttuja||Rakennuksen lämmönkulutus laskettuna rakennuspinta-alaa kohti erityyppisissä rakennuksissa (W/m2/K)  
Rakennuskanta|Suhteellinen energiankulutus|muuttuja|Rakennuksen suhteellinen energiankulutus erityyppisissä ja eri tavalla korjatuissa rakennuksissa verrattuna vertailurakennukseen|
Suhteellinen energiankulutus|tägi|muuttuja||Rakennuksen suhteellinen energiankulutus erityyppisissä ja eri tavalla korjatuissa rakennuksissa verrattuna vertailurakennukseen  
Rakennuskanta|Kuluttajasähkö|muuttuja|Kuluttajasähkön määrä erityyppisissä rakennuksissa rakennusneliömetriä kohti (W/m2)|
Kuluttajasähkö|tägi|muuttuja||Kuluttajasähkön määrä erityyppisissä rakennuksissa rakennusneliömetriä kohti (W/m2)  
Rakennuskanta|Kulutusjousto|muuttuja|Sähköntarpeen kulutusjousto siirtää kysyntää muutamilla tunneilla huippukysynnän tasoittamiseksi|
Kulutusjousto|tägi|muuttuja||Sähköntarpeen kulutusjousto siirtää kysyntää muutamilla tunneilla huippukysynnän tasoittamiseksi  
Rakennuskanta|Energiankulutus|muuttuja|Rakennusten kokonaisenergiankulutus energialajeittain eri sääoloissa (W)|
Energiankulutus|tägi|muuttuja||Rakennusten kokonaisenergiankulutus energialajeittain eri sääoloissa (W)  
Rakennuskanta|Puurakentamisen elinkaarivaikutus|muuttuja|Puurunkoisella rakentamisella on vaikutuksia lämmitystarpeeseen, rakennusmateriaalien elinkaarivaikutuksiin ja sisäilmaan.|Näitä asioita tarkastelevan muuttujan täsmällinen sisältö on kuitenkin epäselvä
Puurakentamisen elinkaarivaikutus|tägi|muuttuja||Puurunkoisella rakentamisella on vaikutuksia lämmitystarpeeseen, rakennusmateriaalien elinkaarivaikutuksiin ja sisäilmaan.  
Rakennuskanta|Sisäilmaolosuhteet|muuttuja|Sisäilmaolosuhteilla tarkoitetaan lämpötilaa, kosteutta, melua, sisäilmassa olevia yhdisteitä ja muita tekijöitä, joilla voi olla vaikutusta ihmisen terveyteen tai viihtyisyyteen.|Täsmällinen sisältö määrittelemättä
Sisäilmaolosuhteet|tägi|muuttuja||Sisäilmaolosuhteilla tarkoitetaan lämpötilaa, kosteutta, melua, sisäilmassa olevia yhdisteitä ja muita tekijöitä, joilla voi olla vaikutusta ihmisen terveyteen tai viihtyisyyteen.  
</t2b>
Rakennuskanta nyt|kuuluu joukkoon|Rakennuskanta||
 
Rakennuskannan suuruus|kuuluu joukkoon|Rakennuskanta||
<t2b name="Energiarenessanssin relaatiot" index="Subjekti,Relaatio,Voima,Objekti,Tarkenne" obs="Kuvaus" unit="-">
Korjausrakentaminen|kuuluu joukkoon|Rakennuskanta||
eji75|vaikuttaa||ene8||Suositus parantaa energiatehokkuutta
Korjausrakentamisen tyyppi|kuuluu joukkoon|Rakennuskanta||
eji78|vaikuttaa||ene5||Puurakentaminen tuottaa energiatehokkaampia taloja
Uudisrakentaminen ja purkaminen|kuuluu joukkoon|Rakennuskanta||
eji79|vaikuttaa||ene7||Olosuhdeseuranta tehostaa energiankäyttöä
Lämmitysmuoto ja energiatehokkuus|kuuluu joukkoon|Rakennuskanta||
eji80|vaikuttaa||ene10||Kysyntäjousto
Lämmön ominaiskulutus|kuuluu joukkoon|Rakennuskanta||
ene1|vaikuttaa|lisäävästi|ene2||Tuleva rakennuskanta perustuu nykyiseen
Suhteellinen energiankulutus|kuuluu joukkoon|Rakennuskanta||
ene3|vaikuttaa||ene2||Korjausrakentaminen muuttaa rakennuskantaa
Kuluttajasähkö|kuuluu joukkoon|Rakennuskanta||
ene4|vaikuttaa||ene2||Korjausrakentaminen muuttaa rakennuskannan laatua
Kulutusjousto|kuuluu joukkoon|Rakennuskanta||
ene5|vaikuttaa|lisäävästi|ene2||Uudisrakentaminen lisää ja purkaminen vähentää rakennuskantaa
Energiankulutus|kuuluu joukkoon|Rakennuskanta||
ene6|vaikuttaa||ene2||Lämmitysmuoto vaikuttaa rakennuskannan rakenteeseen
Puurakentamisen elinkaarivaikutus|kuuluu joukkoon|Rakennuskanta||
ene7|vaikuttaa||ene11||Lämmön ominaiskulutus vaikuttaa rakennuskannan energiankulutukseen
Sisäilmaolosuhteet|kuuluu joukkoon|Rakennuskanta||
ene8|vaikuttaa||ene2||Energiankulutus vaikuttaa rakennuskannan rakenteeseen
Energiatehokkuus EU-laeissa|vaikuttaa|Kulutusjousto||Kysyntäjousto
ene9|vaikuttaa|lisäävästi|ene11||Kuluttajasähkö lisää energiankulutusta
Nykyisistä energiatodistuksista on luovuttava ja korvattava ne todellisella tuntikohtaisella kulutustiedolla|vaikuttaa|Kulutusjousto||Tuntikohtainen laskutus innostaa vähentämään kulutusta
ene10|vaikuttaa||ene11||Kulutusjousto muuttaa kulutuksen ajoitusta edullisemmaksi
Kuluttajasähkö|vaikuttaa|Energiankulutus|voima;lisäävästi;;|Kuluttajasähkö lisää energiankulutusta
ene2|vaikuttaa|lisäävästi|ene11||Rakennuskannan koko vaikuttaa energiankulutukseen
Rakennuskannan suuruus|vaikuttaa|Energiankulutus|voima;lisäävästi;;|Rakennuskannan koko vaikuttaa energiankulutukseen
eji83|vaikuttaa||ene3||Peruskorjausten tehostaminen parantaa rakennuskannan laatua
Kulutusjousto|vaikuttaa|Energiankulutus||Kulutusjousto muuttaa kulutuksen ajoitusta edullisemmaksi
eji85|vaikuttaa||ene7||Passiivinen jäähdytys vähentää lämmönkulutusta joissakin rakennustyypeissä
Lämmön ominaiskulutus|vaikuttaa|Energiankulutus||Lämmön ominaiskulutus vaikuttaa rakennuskannan energiankulutukseen
eji90|vaikuttaa||ene7||Rakennusohjeet vaikuttavat lämmönkulutukseen uudisrakennuksissa
Rakennuskanta nyt|vaikuttaa|Rakennuskannan suuruus|voima;lisäävästi;;|Tuleva rakennuskanta perustuu nykyiseen
eji91|vaikuttaa||ene8||Käyttöneuvonta vaikuttaa koko rakennuskannan energiankulutukseen
Suhteellinen energiankulutus|vaikuttaa|Rakennuskannan suuruus||Energiankulutus vaikuttaa rakennuskannan rakenteeseen
kom1424|vaikuttaa||ene7||Energialasku innostaa vähentämään kulutusta
Korjausrakentaminen|vaikuttaa|Rakennuskannan suuruus||Korjausrakentaminen muuttaa rakennuskantaa
kom1432|vaikuttaa||ene10||Tuntikohtainen laskutus innostaa vähentämään kulutusta
Korjausrakentamisen tyyppi|vaikuttaa|Rakennuskannan suuruus||Korjausrakentaminen muuttaa rakennuskannan laatua
kom1435|vaikuttaa||ene7||Energiakatselmukset auttavat energiansäästössä jos toimia tuetaan
Uudisrakentaminen ja purkaminen|vaikuttaa|Rakennuskannan suuruus|voima;lisäävästi;;|Uudisrakentaminen lisää ja purkaminen vähentää rakennuskantaa
kom1442|vaikuttaa||ene7||Koulutus ja neuvonta auttavat vähentämään energiankulutusta
Lämmitysmuoto ja energiatehokkuus|vaikuttaa|Rakennuskannan suuruus||Lämmitysmuoto vaikuttaa rakennuskannan rakenteeseen
kom1445a|vaikuttaa||||Aurinkosuojaus vähentää jäähdytystarvetta
Cleantech-ratkaisut|vaikuttaa|Korjausrakentaminen||Peruskorjausten tehostaminen parantaa rakennuskannan laatua
kom1445|vaikuttaa||ene7||Rakennuskatsastukset auttavat energiansäästössä
Olosuhdeseurannan digitalisaatio|vaikuttaa|Uudisrakentaminen ja purkaminen||Puurakentaminen tuottaa energiatehokkaampia taloja
kom1448|vaikuttaa||ene5||Huonojen purkaminen vähentää rakennuskantaa
Sähkön huippukulutuksen hillitseminen on tärkeää|vaikuttaa|Uudisrakentaminen ja purkaminen||Huonojen purkaminen vähentää rakennuskantaa
ene9|tekee relevantiksi||kom1448||Huippukulutuksen hillintä on tärkeää
Rakennuksille pakollinen 5-vuotiskatsastus|vaikuttaa|Lämmön ominaiskulutus||Rakennuskatsastukset auttavat energiansäästössä
ene6|tekee relevantiksi||kom1470||Puurakentaminen on tärkeää
Kysyntäjouston lisääminen|vaikuttaa|Lämmön ominaiskulutus||Olosuhdeseuranta tehostaa energiankäyttöä
ene6|||kom1472||Rakennuksista puhuttaessa ihmisten hyvinvointi on tärkeää
Energiansäästöä on tehostettava koulutuksella ja neuvonnalla|vaikuttaa|Lämmön ominaiskulutus||Koulutus ja neuvonta auttavat vähentämään energiankulutusta
ene9|||kom1484||Sähkönkulutuksessa jäähdytys on myös tärkeää
Lämmön talteenottoa lämpöpumpuilla lisättävä.|vaikuttaa|Lämmön ominaiskulutus||Lämpöpumput vähentävät energian ominaiskulutusta
kom1494|vaikuttaa||pienhiukkaspäästöt||Puunpoltto vaikuttaa pienhiukkaspäästöihin
Asuntojen lämpölaskut määrättävä todellista kulutusta vastaaviksi|vaikuttaa|Lämmön ominaiskulutus||Energialasku innostaa vähentämään kulutusta
ene9|tekee relevantiksi||kom1504||Halpa sähkö ei kannusta sähkönsäästöön
Kioton pyramidin käyttö|vaikuttaa|Lämmön ominaiskulutus||Passiivinen jäähdytys vähentää lämmönkulutusta joissakin rakennustyypeissä
ene7|tekee relevantiksi||kom1511||Energiatieto rakennuksista on tärkeää
Energiakatselmuksissa löytyvien ongelmien korjaamista on tuettava.|vaikuttaa|Lämmön ominaiskulutus||Energiakatselmukset auttavat energiansäästössä jos toimia tuetaan
kom1525|vaikuttaa||ene7||Lämpöpumput vähentävät energian ominaiskulutusta
Sisäilma- ja käyttöneuvonta|vaikuttaa|Lämmön ominaiskulutus||Rakennusohjeet vaikuttavat lämmönkulutukseen uudisrakennuksissa
kom1576|jos niin ei||kom1445||Säätelykielto estää aurinkosuojapakon
Aurinkolämmön ja -sähkön edistäminen|vaikuttaa|Suhteellinen energiankulutus||Suositus parantaa energiatehokkuutta
kom1576|jos niin ei||kom1424||Säätelykielto estää lämpölaskumääräykset
Energiatodistusten hyödyntäminen|vaikuttaa|Suhteellinen energiankulutus||Käyttöneuvonta vaikuttaa koko rakennuskannan energiankulutukseen
kom1576|jos niin ei||kom1432||Säätelykielto estää katsastukset
Julkisella sektorilla ei ole oikeutta ohjata ihmisten asumista eikä kulutuskäyttäytymistä.|jos niin ei|Asuntojen lämpölaskut määrättävä todellista kulutusta vastaaviksi||Säätelykielto estää lämpölaskumääräykset
ene12|tekee relevantiksi||kom1470||Puurakentamiseen liittyy arvoja, jotka johtuvat sen vaikutuksista ihmisiin
Julkisella sektorilla ei ole oikeutta ohjata ihmisten asumista eikä kulutuskäyttäytymistä.|jos niin ei|Nykyisistä energiatodistuksista on luovuttava ja korvattava ne todellisella tuntikohtaisella kulutustiedolla||Säätelykielto estää katsastukset
ene13|tekee relevantiksi||kom1472||Ihmisten hyvinvointi rakennuksiin liittyen on tärkeää.
Julkisella sektorilla ei ole oikeutta ohjata ihmisten asumista eikä kulutuskäyttäytymistä.|jos niin ei|Rakennuksille pakollinen 5-vuotiskatsastus||Säätelykielto estää aurinkosuojapakon
Kuluttajasähkö|tekee relevantiksi|Sähkön huippukulutuksen hillitseminen on tärkeää||Huippukulutuksen hillintä on tärkeää
Lämmitysmuoto ja energiatehokkuus|tekee relevantiksi|Pitkäikäistä hengittävää puurakentamista on suosittava||Puurakentaminen on tärkeää
Puurakentamisen elinkaarivaikutus|tekee relevantiksi|Pitkäikäistä hengittävää puurakentamista on suosittava||Puurakentamiseen liittyy arvoja, jotka johtuvat sen vaikutuksista ihmisiin
Sisäilmaolosuhteet|tekee relevantiksi|Rakennuksista puhuttaessa muistettava myös ihmisten hyvinvointi.||Ihmisten hyvinvointi rakennuksiin liittyen on tärkeää.
Lämmitysmuoto ja energiatehokkuus|tekee relevantiksi|Rakennuksista puhuttaessa muistettava myös ihmisten hyvinvointi.||Rakennuksista puhuttaessa ihmisten hyvinvointi on tärkeää
Kuluttajasähkö|tekee relevantiksi|Rakennusten viilennys alkaa olla tärkeämpää kuin lämmitys.||Sähkönkulutuksessa jäähdytys on myös tärkeää
Kuluttajasähkö|tekee relevantiksi|Sähkön pitäisi olla kalliimpaa, jotta se kannustaisi säästöön.||Halpa sähkö ei kannusta sähkönsäästöön
Lämmön ominaiskulutus|tekee relevantiksi|Uusista rakennuksista on ilmoitettava energiankulutus kWh/asunto-m2/a.||Energiatieto rakennuksista on tärkeää
</t2b>
</t2b>
}}
}}
Rivi 258: Rivi 568:
'päätös';Päätös;
'päätös';Päätös;
'teko';Teko;
'teko';Teko;
'arvo';Arvo;
'väite';Väite|default:'muuttuja'|
'väite';Väite|default:'muuttuja'|
name:rajaus|description:Rajaa tiettyihin asioihin ja niiden relaatioihin listaamalla ID:t tähän muotoon c('ID1', 'ID2')|
name:rajaus|description:Rajaa tiettyihin asioihin ja niiden relaatioihin listaamalla nimet tähän muotoon c('Nimi1', 'Nimi2')|
name:taulukot|description:Haluatko nähdä myös taulukot?|type:selection|options:
name:taulukot|description:Haluatko nähdä myös taulukot?|type:selection|options:
FALSE;En;
FALSE;En;
Rivi 266: Rivi 577:
#This is code Op_fi5642/ on page [[op_fi:Energiarenessanssi]]
#This is code Op_fi5642/ on page [[op_fi:Energiarenessanssi]]
# Parameters:
# Parameters:
# sanalliset: character vector about object types with text labels
#sanalliset <- "muuttuja" # character vector about object types with text labels
# rajaus: IDs of items that are plotted in a smaller graph (also their connections are plotted)
#rajaus <- "Uusiutuvat" # IDs of items that are plotted in a smaller graph (also their connections are plotted)
# taulukot: TRUE of FALSE depending whether tables are printed.
#taulukot <- FALSE # TRUE of FALSE depending whether tables are printed.


library(OpasnetUtils)
library(OpasnetUtils)
Rivi 278: Rivi 589:


edgetype <- data.frame(
edgetype <- data.frame(
   Relation = c(
   Predikaatti = c(
     "jos niin",
     "jos niin",
    "jos - niin",
     "jos niin ei",
     "jos niin ei",
     "kuuluu valintajoukkoon",
     "kuuluu valintajoukkoon",
Rivi 286: Rivi 598:
     "on sama kuin",
     "on sama kuin",
     "omistaa tägin",
     "omistaa tägin",
     "on"
     "on",
    "kuuluu joukkoon"
   ),
   ),
   Color = c(
   Color = c(
    "Green",
     "Green",
     "Green",
     "Red",
     "Red",
Rivi 296: Rivi 610:
     "White",
     "White",
     "White",
     "White",
     "White"
     "White",
    "Black"
   ),
   ),
   Width = c(1, 1, 0.5, 1, 3, 1, 1, 1)
   Width = c(1, 1, 1, 0.5, 1, 3, 1, 1, 1, 1),
  stringsAsFactors = TRUE
)
)
edgetype$Color <- as.character(edgetype$Color)


vertextype = data.frame(
vertextype = data.frame(
Rivi 309: Rivi 624:
     "väite",
     "väite",
     "arvo",
     "arvo",
     "oliotyyppi"
     "oliotyyppi",
    "arviointi",
    "metodi"
   ),
   ),
   Shape = c(
   Shape = c(
Rivi 315: Rivi 632:
     "rectangle",
     "rectangle",
     "square",
     "square",
    "circle",
    "circle",
     "circle",
     "circle",
     "circle",
     "circle",
     "circle"
     "circle"
   ),
   ),
   Size = c(20,10,10,10,10,10)
   Size = c(20,10,10,10,10,10,10,10),
  StringsAsFactors = TRUE
)
)
vertextype$Shape <- as.character(vertextype$Shape)


findtypes <- function(
findtypes <- function(
Rivi 348: Rivi 667:
}
}


# Case data
#### Case data


ene <- opbase.data("Op_fi5642", subset = "Energiarenessanssin asioita")   # [[Energiarenessanssi]]
objects.latest("Op_fi5642", code_name = "preprocessing")
rel <- opbase.data("Op_fi5642", subset = "Energiarenessanssin relaatiot") # [[Energiarenessanssi]]
str <- opbase.data("Op_fi4646", subset = "Tavoitteet") # [[Helsingin strategiset energiatehokkuus- ja ilmastotavoitteet]]
ohj <- opbase.data("Op_fi4647") # [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet]]


objects.latest("Op_fi5339", code_name = "preprocessing")
jy.original <- jy
eji <- ejikysely
jy2 <- jy
kom <- ejikomm
for(i in 1:ncol(jy2)) jy2[[i]] <- as.character(jy2[[i]])
#Format edges
jy2$ecolor <- "Skyblue2" #edgetype$Color[match(jy$Predikaatti, edgetype$Predikaatti)]
jy2$ewidth <- 1 # edgetype$Width[match(jy$Predikaatti, edgetype$Predikaatti)]
jy2$earrow.size <- 0.5
oprint(head(jy2))


# ene: "Obs"    "Aihe"   "Asia"   "Tyyppi" "Kuvaus" "Result"
if(taulukot) oprint(jy2)
# rel: "Obs"     "Subjekti" "Relaatio" "Voima"    "Objekti" "Tarkenne" "Result"
    
# str: "Obs"        "Aineisto"   "Sivunumero" "Jaenumero"  "Osa-alue"  "Tavoite"    "Result"
   # Format vertices
# ohj: "Obs"        "Aineisto"              "Sivunumero"           
  asnam <- c("Name", "Topic", "Desc", "Note", "Type", "ID")
#      [4] "Osa-alue"              "Toimenpide"            "Relaatio"             
   col <- colorRampPalette(brewer.pal(11, "RdYlGn"))(165)
#      [7] "Strategiatason tavoite" "Toimija"                "Result"
 
# eji: "Aihe"     "Toimi"    "Vaikutus" "Kannatus" "Puolesta" "Vastaan"  "Ehdotus"
  items <- data.frame(
# kom: "Row"    "Time"    "Comment" "Topic"  "Note"
    Nimi = c(jy2$Subjekti, jy2$Objekti),
     stringsAsFactors = TRUE
  )
  items <- items[!duplicated(items$Nimi) , , drop = FALSE]


ene$Obs <- paste("ene", ene$Obs, sep = "")
oprint(head(items))
rel$Obs <- paste("rel", rel$Obs, sep = "")
 
str$Obs <- paste("str", str$Obs, sep = "")
  #items$vsize <- vertextype$Size[match(items$Type, vertextype$Type)]
ohj$Obs <- paste("ohj", ohj$Obs, sep = "")
  #items$vcolor <- col[83 + as.numeric(as.character(items$Note))]
eji$Obs <- paste("eji", 1:nrow(eji), sep = "")
  #items$vcolor[is.na(items$vcolor)] <- col[83]
kom$Row <- paste("kom", kom$Row, sep = "")
  #items$vcolor[items$Type == "muuttuja"] <- "SkyBlue2"
  #items$vcolor[grepl("kiistelty", items$Note)] <- "Pink"
  #items$vshape <- vertextype$Shape[findtypes(items$Type, vertextype$Type)]
 
  #if(taulukot) oprint(items)
 
  ######## Plot all nodes
 
if(FALSE)
  # Change selected names to IDs.
  jy2$Subject <- ifelse(
    findanytype(jy2$Type_s, sanalliset),  
    as.character(jy2$Subject),  
    as.character(jy2$ID_s)
  )
  jy2$Object <- ifelse(
    findanytype(jy2$Type_o, sanalliset),  
    as.character(jy2$Object),  
    as.character(jy2$ID_o)
  )
  items2$Name <- ifelse(
    findanytype(items2$Type, sanalliset),  
    as.character(items2$Name),  
    as.character(items2$ID)
  )
}
if(FALSE) {
  ##### Plot selected nodes
  jy3 <- jy[jy$ID_s %in% rajaus | jy$ID_o %in% rajaus , ]
  vtest <- items$Name %in% jy3$Subject | items$Name %in% jy3$Object | items$ID %in% rajaus
  jygraph <- graph.data.frame(
    jy3[c(1,4,2,3,5:ncol(jy))],  
    directed = TRUE,  
    vertices = items[vtest , ]
  )
}


colnames(ene) <- c("AsiaID", "Aihe", "Asia", "Tyyppi", "Kuvaus", "Huom")
jygraph <- graph.data.frame(
colnames(rel) <- c("AsiaID", "Subjekti", "Relaatio", "Voima", "Objekti", "Tarkenne", "Kuvaus")
  jy2[c(1,3,2,4,5:ncol(jy2))],  
colnames(str) <- c("AsiaID", "Huom", "Sivunumero", "Jaenumero", "Aihe", "Asia", "Kuvaus")
  directed = TRUE,  
colnames(ohj) <- c("AsiaID", "Kuvaus", "Sivunumero", "Aihe", "Asia", "Relaatio", "Tavoite",  
  vertices = items
                  "Toimija", "Huom")
)
colnames(eji) <- c("Aihe", "Asia", "Vaikutus", "Huom", "Puolesta", "Vastaan", "Kuvaus", "AsiaID")
colnames(kom) <- c("AsiaID", "Aika", "Kuvaus", "Aihe", "Asia", "Tyyppi", "Huom")


ene$Tyyppi <- "muuttuja"
plot(jygraph,
str$Tyyppi <- "arvo"
    vertex.label.cex = 0.8,
ohj$Tyyppi <- "päätös"
    vertex.label = NA,
ohj$Relaatio <- NULL
    vertex.size = 2, #V(jygraph)$vsize,
eji$Tyyppi <- "päätös"
    vertex.color = "Skyblue2",#V(jygraph)$vcolor,
eji$Vaikutus <- NULL
    vertex.shape = "circle",#V(jygraph)$vshape,
eji$Huom <- as.factor(as.character(eji$Huom))
    vertex.frame.color = "Black",
    vertex.label.family = "Helvetica",
    edge.color = "Black",#E(jygraph)$ecolor,
    edge.width = 0.5, #E(jygraph)$ewidth,
    edge.arrow.size = 0.5,
    layout = layout.fruchterman.reingold
)
</rcode>


# Temporary removals:
<rcode name="preprocessing" label="Alusta data.frame (vain kehittäjille)" embed=1>
str <- str[-c(3, 4)]
#This is code Op_fi5642/preprocessing on page [[:op_fi:Energiarenessanssi]]
ohj <- ohj[-c(3, 6, 7)]
eji <- eji[-c(4, 5)]
kom <- kom[-2]


dat <- rbind(ene, str, ohj, eji, kom)
library(OpasnetUtils)


# Create full table with edges and vertices.
# Case data


jy <- merge(rel, dat, by.x = "Subjekti", by.y = "AsiaID")
ohj <- opbase.data("Op_fi4647") # [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet]]
jy <- merge(jy, dat, by.x = "Objekti", by.y = "AsiaID")


# colnames(jy):  
# ohj: "Obs"       "Aineisto"               "Sivunumero"          
# [1] "Objekti" "Subjekti" "AsiaID" "Relaatio" "Voima" "Tarkenne"  
#     [4] "Osa-alue"               "Toimenpide"             "Relaatio"            
# [7] "Kuvaus.x" "Aihe.x" "Asia.x" "Tyyppi.x" "Kuvaus.y" "Huom.x"  
#     [7] "Strategiatason tavoite" "Toimija"               "Result"  
# [13] "Aihe.y" "Asia.y" "Tyyppi.y" "Kuvaus" "Huom.y"  


jy <- jy[c(9, 4, 5, 14, 8, 13, 11, 7, 16, 12, 6, 17, 10, 15, 2, 3, 1)]
jy <- data.frame(
  Subjekti = ohj$Toimenpide,
  Predikaatti = "tukee",
  Objekti = ohj$"Strategiatason tavoite",
  Tarkenne = paste("viite;", ohj$Aineisto, ohj$Sivunumero, ";;"),
  Kuvaus = ""
)
jy <- rbind(jy, data.frame(
  Subjekti = ohj$Toimenpide,
  Predikaatti = "toimija",
  Objekti = ohj$Toimija,
  Tarkenne = "",
  Kuvaus = ""
))
jy <- rbind(jy, data.frame(
  Subjekti = ohj$Toimenpide,
  Predikaatti = "tägi",
  Objekti = "päätös",
  Tarkenne = "",
  Kuvaus = ""
))
jy <- rbind(jy, data.frame(
  Subjekti = ohj$Toimenpide,
  Predikaatti = "kuuluu joukkoon",
  Objekti = ohj$Result,
  Tarkenne = "",
  Kuvaus = ""
))


colnames(jy) <- c(
str <- opbase.data("Op_fi4646", subset = "Tavoitteet") # [[Helsingin strategiset energiatehokkuus- ja ilmastotavoitteet]]
  "Subject",
  "Relation",
  "Strength",
  "Object",
  "Topic_s",
  "Topic_o",
  "Desc_s",
  "Desc_r",
  "Desc_o",
  "Note_s",
  "Note_r",
  "Note_o",
  "Type_s",
  "Type_o",
  "ID_s",
  "ID_r",
  "ID_o"
)


#Format edges
# str: "Obs"        "Aineisto"  "Sivunumero" "Jaenumero"  "Osa-alue"  "Tavoite"    "Result" 
jy$ecolor <- edgetype$Color[match(jy$Relation, edgetype$Relation)]
jy$ewidth <- edgetype$Width[match(jy$Relation, edgetype$Relation)]
jy$earrow.size <- 0.5


if(taulukot) oprint(jy)
jy <- rbind(jy, data.frame(
  Subjekti = str$Tavoite,
  Predikaatti = "kuuluu joukkoon",
  Objekti = str$"Osa-alue",
  Tarkenne = paste("viite;", str$Aineisto, str$Sivunumero, ";; ./ jae;", str$Jaenumero, ";;"),
  Kuvaus = ""
))
jy <- rbind(jy, data.frame(
  Subjekti = str$Tavoite,
  Predikaatti = "tägi",
  Objekti = "tavoite",
  Tarkenne = "",
  Kuvaus = str$Result
))


# Format vertices
#### Terveys- ja ilmastokeskustelu
asnam <- c("Name", "Topic", "Desc", "Note", "Type", "ID")
col <- colorRampPalette(brewer.pal(11, "RdYlGn"))(165)


items <- jy[c("Subject","Topic_s","Desc_s","Note_s","Type_s","ID_s")]
temp <- opbase.data("Op_fi5339", subset = "Terveys- ja ilmastokeskustelu")[-1] # [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
colnames(items) <- asnam
colnames(temp)[5] <- "Kuvaus"
temp <-  jy[c("Object","Topic_o","Desc_o","Note_o","Type_o","ID_o")]
jy <- rbind(jy, temp)
colnames(temp) <- asnam
items <- rbind(items, temp)
items <- items[!duplicated(items$Name) , ]


items$vsize <- vertextype$Size[match(items$Type, vertextype$Type)]
#### Robottiautot ja matkojenyhdistely
items$vcolor <- col[83 + as.numeric(as.character(items$Note))]
items$vcolor[is.na(items$vcolor)] <- col[83]
items$vcolor[items$Type == "muuttuja"] <- "SkyBlue2"
items$vcolor[grepl("kiistelty", items$Note)] <- "Pink"
items$vshape <- vertextype$Shape[findtypes(items$Type, vertextype$Type)]


if(taulukot) oprint(items)
temp <- opbase.data("Op_fi5339", subset = "Robottiautot ja matkojenyhdistely")[-1] # [[Keskipitkän aikavälin ilmastopolitiikan suunnitelma]]
colnames(temp)[5] <- "Kuvaus"
jy <- rbind(jy, temp)


######## Plot all nodes
##### Energiarenessanssi


jy2 <- jy
temp <- opbase.data("Op_fi5642", subset = "Energiarenessanssin asioita")[-1]  # [[Energiarenessanssi]]
items2 <- items
colnames(temp)[5] <- "Kuvaus"
jy <- rbind(jy, temp)


# Change selected names to IDs.
#### Energia- ja ilmastokysely
jy2$Subject <- ifelse(
  findanytype(jy2$Type_s, sanalliset),
  as.character(jy2$Subject),
  as.character(jy2$ID_s)
)
jy2$Object <- ifelse(
  findanytype(jy2$Type_o, sanalliset),
  as.character(jy2$Object),
  as.character(jy2$ID_o)
)
items2$Name <- ifelse(
  findanytype(items2$Type, sanalliset),
  as.character(items2$Name),
  as.character(items2$ID)
)


jygraph <- graph.data.frame(
objects.latest("Op_fi5339", code_name = "preprocessing")
  jy2[c(1,4,2,3,5:ncol(jy2))],
  directed = TRUE,  
  vertices = items2
)


plot(jygraph,
eji <- ejikysely
    vertex.label.cex = 0.8,
# eji: "Aihe"    "Toimi"    "Vaikutus" "Kannatus" "Puolesta" "Vastaan" "Ehdotus"  
    vertex.size = V(jygraph)$vsize,
    vertex.color = V(jygraph)$vcolor,
    vertex.shape = V(jygraph)$vshape,
    vertex.frame.color = "Black",
    vertex.label.family = "Helvetica",
    edge.color = E(jygraph)$ecolor,
    edge.width = E(jygraph)$ewidth,
    edge.arrow.size = 0.5,
    layout = layout.fruchterman.reingold
)


##### Plot selected nodes
jy <- rbind(jy, data.frame(
  Subjekti = eji$Toimi,
  Predikaatti = "tägi",
  Objekti = "päätös",
  Tarkenne = "",
  Kuvaus = paste(eji$Ehdotus, ". Kannatus: ", eji$Puolesta, ", ", eji$Vastaan, sep = "")
), data.frame(
  Subjekti = eji$Toimi,
  Predikaatti = "vaikuttaa",
  Objekti = eji$Aihe,
  Tarkenne = "",
  Kuvaus = ""
))


jy3 <- jy[jy$ID_s %in% rajaus | jy$ID_o %in% rajaus , ]
kom <- ejikomm
# kom: "Row"    "Time"    "Comment" "Topic"  "Note"


vtest <- items$Name %in% jy3$Subject | items$Name %in% jy3$Object |
jy <- rbind(jy, data.frame(
   items$ID %in% rajaus
  Subjekti = kom$Name,
jygraph <- graph.data.frame(
  Predikaatti = "tägi",
   jy3[c(1,4,2,3,5:ncol(jy))],  
  Objekti = kom$Type,
   directed = TRUE,  
  Tarkenne = "",
   vertices = items[vtest , ]
   Kuvaus = kom$Comment
)
), data.frame(
   Subjekti = kom$Topic,
  Predikaatti = "tekee relevantiksi",
  Objekti = kom$Name,
   Tarkenne = "",
   Kuvaus = ""
))


plot(jygraph,
objects.store(jy)
    vertex.label.cex = 0.8,
cat("Data.frame jy tallennettu.\n")
    vertex.size = V(jygraph)$vsize,
    vertex.color = V(jygraph)$vcolor,
    vertex.shape = V(jygraph)$vshape,
    vertex.frame.color = "Black",
    vertex.label.family = "Helvetica",
    edge.color = E(jygraph)$ecolor,
    edge.width = E(jygraph)$ewidth,
    edge.arrow.size = 0.5,
    layout = layout.fruchterman.reingold
)
</rcode>
</rcode>


== Katso myös ==
== Katso myös ==


{{Hiilineutraali Helsinki 2035}}
* [https://docs.google.com/presentation/d/1LZYAFY7XTTjE3Rw2kBLgUubkjC5G5jNCX4q7gjhyix0/edit#slide=id.g43b7d2aed1_0_29 Arvoprofiili, remontit ja asumisen omadata] (Google-esitys lokakuussa 2018
* Energiarenessanssi-arviointi siten kuin se lokakuussa 2016 ajateltiin [http://fi.opasnet.org/fi-opwiki/index.php?title=Energiarenessanssi&oldid=34340]
* [[Helsingin energiapäätös 2015]]
* [[Helsingin energiapäätös 2015]]
* [[Helsingin strategiset energiatehokkuus- ja ilmastotavoitteet]]
* [[Helsingin strategiset energiatehokkuus- ja ilmastotavoitteet]]
* [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet]]
* [[Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet]]
* http://www.klimaatti.fi/korjaa-energiapihiksi/
* [[:op_en:Parsha]] Hakemus Suomen Akatemialle sisältäen mm. tämän arvioinnin toteuttamisen.
* [[:op_en:Parsha]] Hakemus Suomen Akatemialle sisältäen mm. tämän arvioinnin toteuttamisen.
* {{#l:Miten tieto sidotaan päätöksentekoon.pptx}}
* {{#l:Miten tieto sidotaan päätöksentekoon.pptx}}

Nykyinen versio 8. syyskuuta 2020 kello 08.51


Energiarenessanssi on Helsingin kaupungin toimenpideohjelma, jolla pyritään edistämään rakenusten (erityisesti muiden kuin Helsingin kaupungin omassa omistuksessa olevien) energiaparannuksia muiden korjausten yhteydessä.

Rajaus

Kysymys

  1. Millaisia toimenpiteitä Helsingin kaupungissa pitäisi tehdä (mukaanlukien mutta ei rajautuen Hiilineutraali Helsinki 2035 -toimenpideohjelman toimenpiteisiin), jotta kaupungin rakennuskanta saataisiin mahdollisimman energiatehokkaaksi nopeasti?
  2. Miten toimenpiteiden toteutumista ja vaikutuksia seurataan osana toimenpideohjelmaa?

Oletettu käyttö ja käyttäjät

Helsingin kaupunki käyttää tietoja tehdäkseen toiminnastaan sisäisesti johdonmukaista, jotta toimenpiteet eivät estäisi toisten toimenpiteiden toteuttamista tai niiden tavoitteiden saavuttamista.

Osallistujat

  • Jouni Tuomisto THL, arvioinnin vetäjä
  • Helsingin kaupungin ympäristökeskus, ongelmanomistaja. (Jari Viinanen, Petteri Huuska, Mira Jarkko, Sonja-Maria Ignatius)

Rajaus

Tarkasteltavana ovat lämmityksen ilmastopäästöt ja kustannukset vuoteen 2035 asti.

Vaihtoehdot

Tarkasteluun otetaan HNH2035-ohjelman neljä toimenpidettä.

Aikataulu ja toteutus

Työ on osa HNH2035-ohjelman toimeenpanoa ja toimii kokeiluna ohjelman laajemmalle toteutukselle.

Vastaus

Jaettu ymmärrys rakennuskantaan liittyvistä asioista. Muuttujarunko on sivulta Helsingin energiapäätös 2015 ja siihen liittyvät asiat ovat energia ja ilmasto -kyselystä ja hankkeesta Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet.
Yksityiskohta edellisestä kuvasta.

Tulokset

Ei ole vielä tuloksia.

Päätelmät

Ei ole vielä päätelmiä.

Perustelut

Riippuvuudet

Parametreja(useita)
ObsKontekstiKohdeMittariAikaSkenaarioUnitTulosKuvausPerustelut
1BAU
2HNH2035
3toteuma
4varaus
5lämpörakennuksen omistajalämmityskorjausten marginaalikustannus1990€/kWh/a0.02korjausrakentamisen yksikkökustannus säästettyä lämpöenergiaa kohti olettaen 25 a investointien pitoajaksiHNH-arvion mukaan hyöty on 0.5 €/kWh 25 vuoden ajan, jolloin hyöty on 0.02 €/kWh/a
6paikallissähköHelsingin kaupunkiorganisaatiosähköinvestointien ominaiskustannus1990€/Wp1aurinkosähköjärjestelmän investoinnin yksikkökustannus käyttöiän eli 25 a ajalta
7paikallissähköHelsingin kaupunkiorganisaatiosähkön ominaistuotanto1990kWh/Wp/a0.9aurinkosähköjärjestelmän vuosittainen yksikkötuotanto
8paikallissähköHelsingin kaupunkiorganisaatiosähkön ylläpidon ominaiskustannus1990€/MWh4.9kunnossapidon yksikkökustannus energiantuotantoa kohti
9sähkön tuottajasähkön ominaistuotto1990€/kWh0.17
Malliriippuvuudet(-)
ObsNameIdentlabeltypeDescriptionChildPage
1renovationIncrCostOp_fi5642/heatlämmityskorjausten marginaalikustannus
2powerSpecInvestCostOp_fi5642/powersähköinvestointien ominaiskustannus
3powerSpecProdOp_fi5642/powersähkön ominaistuotanto
4powerSpecMaintCostOp_fi5642/powersähkön ylläpidon ominaiskustannus
5powerCapacOp_fi5642/mastersähkötehopotentiaali
6powerProdOp_fi5642/impactssähköntuotanto
7powerCostOp_fi5642/impactssähkökustannus
8timeLimitsOp_fi5642/timeLimitsaikarajatindeksi
9powerSpecIncomeOp_fi5642/powersähkön ominaistuotto
10powerIncomeOp_fi5642/impactssähkötuotto
11profitOp_fi5642/impactsvoitto

Laskenta

Näin lasket energiarenessanssin vaikutukset:

  1. Päivitä seurantatiedot Google-taulukkoon
  2. Kerää ja varastoi masterdata koodilla sivulla Hiilineutraali Helsinki 2035#Kerää_ja_varastoi_masterdata
  3. Aja alla oleva koodi nimeltään "Aja malli"
  4. Jos laskentaa pitää päivittää, se todennäköisesti pitää tehdä Aja malli -koodin jälkeen tuleviin koodeihin, koska siinä on laskennan ydin.

Olioiden nimeäminen tehdään camelCasea käyttäen siten, että ensimmäinen sana kertoo aiheena olevan ilmiön, ja sen jälkeen annetaan tarkentavia määreitä sille, mikä tämä nimenomainen ovariable on. Näitä määreitä käytetään:

  • Incr: incremental eli marginaali- (kuvaa skenaarioiden välistä eroa eikä kokonaisvaikutusta)
  • Spec: specific eli ominais- (kuvaa ominaisuutta volyymin suhteen eli esim. €/ton)
  • Tot: total eli kokonais- (kuvaa ominaisuuden koko määrää eli esim. kokonaiskustannus €)
  • Capac: capacity eli kapasiteetti (kuvaa toiminnan käytettävissä olevaa määrää)
  • Maint: maintenance eli ylläpito- (kuvaa jatkuvaa kustannusta tms. per vuosi)
  • Invest: investment eli hankinta- (kuvaa kertaluontoista investoinnin kustannusta tms. hankkeen elinkaaren aikana)
  • Cost: cost eli kustannus
  • Prod: production eli tuotanto
  • Cons: consumption eli kulutus
  • er: energy renaissance eli energiarenessanssi (a subproject of hnh)
  • hnh: Climate Neutral Helsinki 2035 eli hiilinautraali Helsinki 2035 -ohjelma
  • Master: masterdata seurantatiedoista
  • Param: parameters eli parametrit (pysyvät, ei-tapauskohtaiset muuttujat)

Energiarenessanssimallin malliajot:

  • Ajo 20.10.2018 sisältäen ensimmäisiä lämmönkulutuksen ja paikallissähkön tietoja [1]

+ Näytä koodi

+ Näytä koodi

+ Näytä koodi

+ Näytä koodi

+ Näytä koodi

+ Näytä koodi

+ Näytä koodi

+ Näytä koodi

Jaetun ymmärryksen kuvaus

Keskustelua jaetusta ymmärryksestä

  • On hyödyllistä, että ei tavoitella kohsensusta vaan kuvataan myös ristiriidat. Se auttaa ymmärtämään tilannetta.
  • Iso päätös tarvitsee tuekseen paljon sitä tukevia pieniä päätöksiä. Mikä laukaisee prosessin, jolla iso päätös saadaan aikaan? Miten tehdään politiikkaa, jolla estetään pieniä päätöksiä olemasta ison päätöksen vastaisia? Tukevatko pienet päätökset isoa päätöstä, esim. mitkä normit rajoittavat tiivistä kaupunkia?
  • Miten monimutkaisen asian osat liittyvät toisiinsa? Miten kuvataan tällainen järjestelmä siin, että tietokone voi ylläpitää kuvausta järjestelmästä ja tuottaa sieltä hyödyllisiä näkymiä käyttäjälle (esimerkiksi nostaa esiin johonkin yksityiskohtaan liittyviä asioita vaikka käyttäjä ei tiedä niiden liittyvän siihen)?

Tietoa jaettuun ymmärrykseen lähdettiin hakemaan useasta eri lähteestä. Alla olevista lähteistä on tarkoitus koota suoraan tai välivaiheiden kautta yksi yhteinen energia- ja ilmastokuvaus jaetun ymmärryksen menetelmän mukaisena rdf-taulukkona, jota voidaan pilkkoa ja kuvata automaattisesti kaaviona. Joistakin taulukoiden riveistä tulee useita rivejä yhteiseen taulukkoon. Energiarenessanssin asioiden varhaisempi tietomuoto ja koodi jolla se muutettiin löytyy täältä.

Tiedosto:Energiajailmastotekstit.txt

  • Suorasanaista tekstiä valmiista toimenpide-ehdotuksista osittain rakenteisena
    • Toimepide-ehdotukset: kuvaus, puolesta, vastaan
    • Kommentit: timestamp, kommentti
  • Suorasanaista tekstiä yleisön esittämistä toimenpide-ehdotuksista
    • Kommentit: timestamp, kommentti
  • Nettikyselyn päätösehdotukset on t2b sivulla Keskipitkän aikavälin ilmastopolitiikan suunnitelma
    • Sarakkeet: Obs, Aihe, Toimi, Vaikutus (tämä sarake on tyhjä)
    • Kytkeytyvät nettikyselyn toimenpide-ehdotuksiin annetussa järjestyksessä
  • Kyselyn kommenttien tiedot on t2b sivulla Keskipitkän aikavälin ilmastopolitiikan suunnitelma
    • Sarakkeet: Obs, Row, Name, Type, Note (onko kiistelty vai ei)
  • Koodi Op_en5339/preprocessing on page Keskipitkän aikavälin ilmastopolitiikan suunnitelma tuottaa data.framet
  • Tuote: ejikysely ja ejikomm

ejikysely

  • data.frame tuotettu koodilla Op_en5339/preprocessing
  • Sisältää ehdotetut toimenpidevaihtoehdot ja niiden yleisöäänestystuloksen
  • Sarakkeet: row.names, Aihe, Toimi (lyhyt nimi), Vaikutus (tyhjä sarake), Kannatus, Puolesta, Vastaan, Ehdotus (pitkä kuvaus)
  • Tuotteen sarakkeet:
    • Subjekti: Toimi; Relaatio: "tägi"; Objekti: "päätös"; Tarkenne: ""; Kuvaus: paste(Ehdotus, "Kannatus:", Puolesta, ",", Vastaan, sep = "")
    • Subjekti: Toimi; Relaatio: "vaikuttaa"; Objekti: Aihe, Tarkenne: ""; Kuvaus: "".

ejikomm

  • data.frame tuotettu koodilla Op_en5339/preprocessing
  • Sisältää kansalaisten kommentit toimenpide-ehdotuksiin (ei kansalaisten omia toimenpide-ehdotuksia)
  • Sarakkeet: Row, Time, Comment (pitkä kuvaus), Topic (lyhyt kuvaus tai aihe), Name (lyhyt nimi), Type (oliotyyppi), Note (onko kiistelty)
  • Tuotteen sarakkeet:
    • Subjekti: Name; Relaatio: "tägi"; Objekti: Type; Tarkenne: ""; Kuvaus: Comment
    • Subjekti: Topic; Relaatio: "tekee relevantiksi"; Objekti: Name; Tarkenne: ""; Kuvaus: ""

Terveys- ja ilmastokeskustelu

Robottiautot ja matkojenyhdistely

Ohjelmatason tavoitteenmäärittelyt ⇤--#: . Ei tarvita ainakaan vielä. Tavoitehierarkia pitää miettiä uudestaan, jos siihentyöhn lähdetään. --Jouni Tuomisto (keskustelu) 28. marraskuuta 2016 kello 20.34 (UTC) (type: truth; paradigms: science: attack)

  • prettytable sivulta Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet#Ohjelmatason tavoitteet
  • Sarakkeet: Nro, Aineisto (käytetty aineisto), Sivunumero (aineiston sivu), Osa-alue (aihealue), Tavoite (ilmastopoliittinen tavoite), Relaatio (käytännössä "tukee"), Strategiatason tavoite (ylätason tavoite)
  • Tuotteen sarakkeet:
    • Subjekti: Tavoite; Relaatio: "tukee"; Objekti: Strategiatason tavoite; Tarkenne: [viite;paste(Aineisto, Sivunumero;;]; Kuvaus: ""
    • Subjekti: Osa-alue; Relaatio: "tekee relevantiksi"; Objekti: Tavoite; Tarkenne:"", Kuvaus:""
    • Subjekti: Tavoite; Relaatio: "tägi"; Objekti: "tavoite"; Tarkenne: "", Kuvaus: ""

Ilmastopäästöt ⇤--#: . Ei oteta käyttöön vielä. --Jouni Tuomisto (keskustelu) 29. marraskuuta 2016 kello 10.36 (UTC) (type: truth; paradigms: science: attack)

Kustannukset ⇤--#: . EI oteta käyttöön vielä. --Jouni Tuomisto (keskustelu) 29. marraskuuta 2016 kello 10.36 (UTC) (type: truth; paradigms: science: attack)

Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet

  • t2b sivulta Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet#Ohjelmatason toimenpiteet
  • Obs, Aineisto (käytetty aineisto), Sivunumero (aineiston sivunumero), Osa-alue (Aihe), Toimenpide (nimi toimenpiteelle, päätöstyypin olio), Relaatio (yleensä "tukee"), Strategiatason tavoite (ylätason tavoite tai tavoitteet johon liittyy), Toimija (kuka voi päättää asiasta), Vaikutus (Aihealueet joihin vaikuttaa)
  • Tuotteen sarakkeet:
    • Subjekti: Toimenpide; Relaatio: "tukee"; Objekti: Strategiatason tavoite; Tarkenne: ["viite";paste(Aineisto, Sivunumero);;];Kuvaus:""
    • Subjekti: Toimenpide; Relaatio: "toimija"; Objekti: Toimija; Tarkenne: "", Kuvaus: ""
    • Subjekti: Toimenpide; Relaatio: "tägi"; Objekti: "päätös";;
    • Subjekti: Toimenpide; Relaatio: "kuuluu joukkoon"; Objekti: Vaikutus ⇤--#: . Onko tämä oikea relaatio, vai pikemmin "tekee relevantiksi" (subjekti ja objekti toisin päin)? --Jouni Tuomisto (keskustelu) 27. marraskuuta 2016 kello 15.42 (UTC) (type: truth; paradigms: science: attack)

Tavoitteet

  • t2b sivulla Helsingin strategiset energiatehokkuus- ja ilmastotavoitteet#Vastaus
  • Sarakkeet Obs, Aineisto (käytetty aineisto), Sivunumero (aineiston sivu), Jaenumero (mistä tulevat jakeet?); Osa-alue (aihe), Tavoite (lyhyt nimi), Kuvaus (pitkä kuvaus)
  • Tuotteen sarakkeet:
    • Subjekti: Tavoite; Relaatio: "kuuluu joukkoon"; Objekti: Osa-alue; Tarkenne: ["viite";paste(Aineisto, Sivunumero);; ./ "jae";Jaenumero;;]; Kuvaus: ""
    • Subjekti: Tavoite; Relaatio: "tägi"; Objekti: "tavoite"; Tarkenne: "", Kuvaus: Kuvaus

Energiarenessanssin asioita



Jaetun ymmärryksen analyysi

Minkätyyppiset asiat haluat nimineen (muut ovat tunnistenumerolla)?:
Muuttuja
Päätös
Teko
Arvo
Väite

Rajaa tiettyihin asioihin ja niiden relaatioihin listaamalla nimet tähän muotoon c('Nimi1', 'Nimi2'):

Haluatko nähdä myös taulukot?:

+ Näytä koodi

+ Näytä koodi

Katso myös

Hiilineutraali Helsinki 2035 -toimenpideohjelmaan liittyviä sivuja
Helsingin ilmastovahti

Helsingin ilmastovahti · ilmastovahdin toteuttaja Kausal oy · keskustelutyökalujen demoja: kerrokantasi hel kerrokantasi testi, Decidim omastadi testi, Discourse demo, Kialo, Opasnet, argumentit näkemysverkkona · Helsingin digisuunnittelun periaatteet · syksyn 2018 aineistoa · admin-demo (vaatii salasanan) · REST-rajapinta seurantatyökalulle Kerrokantasi-palvelulle · seurantatyökalun tietomallin yleiskuva · ensimmäinen blogi työkalusta Storybook · Skenaariotyökalu · Plotly

Toimepiteitä

Energiarenessanssi ·

Tietokiteitä (englanniksi)

Air pollution emissions in Helsinki · Building model · Building stock in Helsinki · Economic impacts · Emission factors for burning processes · Emission factors for road transport · Energy balance · Energy balance in Helsinki · Energy use of buildings · ERFs of environmental pollutants · External cost · Health impact assessment · Helsinki energy consumption · Helsinki energy production · Intake fractions of PM · Population of Helsinki metropolitan area · Prices of fuels in heat production · Road traffic in Helsinki ·

Aiheeseen liittyviä arviointeja

HSY:n päästölaskenta ja menetelmät · Helsingin energiapäätös 2015 · Climate change policies in Helsinki · Climate change policies and health in Kuopio · Climate change policies in Basel

Katso myös

Toimenpideohjelma Stadinilmasto-sivuilla · juokseva muistio työn etenemisestä · Sitoumus2050 · Helsingin energiapäätökseen liittyviä arvoja · Helsingin hallintokuntien energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet · Helsingin ilmastonmuutos -tiekartta · Helsingin kaupungin talous · Helsingin ohjelmalliset energiatehokkuus- ja ilmastotoimenpiteet ja -tavoitteet · Helsingin strategiset energiatehokkuus- ja ilmastotavoitteet · Ilmastonmuutokseen sopeutuminen: seuranta ja arviointi · Ilmastopolitiikkojen vaikutusten luokittelu · Rakennuskantamalli

Lähteet


Kommentoi arviointia

Voit kommentoida mitä tahansa arvioinnin sivua tässä. Selkeyden vuoksi kirjoita alempaan kenttään sen sivun nimi, jonka asioita kommentoit.