search

NoseF17 / APPR-2019-20

Repozitorij z gradivi za predmet Analiza podatkov s programom R v študijskem letu 2019/20
MIT License
0 stars 0 forks source link

Zaključevanje #6

Open NoseF17 opened 4 years ago

NoseF17 commented 4 years ago

V projekt.Rmd datoteki bom le še dodajal in spreminjal opise grafov, notri pa so dodani že vsi grafi in zemljevidi. Pri napredni analizi me opozori še na nek warning, težavo pa imam tudi pri izrisu grafa graf_regresije, ki se ne pojavi v vrnjeni datoteki ko pritisnem Run Document, prav tako pa se ne pojavi tekst pod grafom. Drugače pa je mislim da je to to, sem morda še na kaj pomembnega pozabil?

timotejvesel commented 4 years ago

Če pri analizi dodaš warning = FALSE, ti opozorila ne bo izpisalo: image \ Za boljšo oceno lahko narediš še Shiny. Če pa ga ne boš imel, v poročilu izbriši vrstico runtime: shiny ter vrstice na koncu, ki pripadajo Shinyju. \ Graf pa mi izriše, če zakomentiram vrstico runtime:shiny. Nevem pa v čem je problem, mogoče bo vedel @jaanos.

jaanos commented 4 years ago

Nisem prepričan, zakaj se to zgodi - izrisovanje zemljevidov s knjižnico leaflet se čudno obnaša v kombinaciji s Shinyjem (podoben problem se je pojavil tudi pri BulaRebula/APPR-2019-20#6). Če npr. odstranim izrisovanje zadnjega grafa, se zemljevidi sploh ne izrišejo...

Kot je napisal @timotejvesel, odstranitev vrstice runtime: shiny pomaga, a le pri poganjanju iz RStudia - na Binderju se namreč poročilo prav tako požene kot Shiny, zato pride tam do istega problema. Morda bo bolje, če poskrbiš le, da bo poročilo pravilno delovalo pri lokalnem poganjanju.

Pri napovedi bi svetoval, da jo raztegneš v prihodnost - rdeče pike bi potem bilo smiselno prikazovati za prihodnost, medtem ko imaš za čas pred tem le obstoječe podatke.

Ko boš imel pripravljeno končno različico projekta, napiši tukaj, pa bom dodal povezavo na repozitorij za zagovore.

NoseF17 commented 4 years ago

Napoved sem poskušal podaljšati tako, da sem v funkcijo graf_regresije dodal

scale_x_continuous(breaks=seq(2009, 2020, 1))

kar pa očitno ni dovolj, saj še vedno ne dela. Kako lahko to naredim?

Drugače pa je projekt zaključen. Zahvaljujem se za vso pomoč.

timotejvesel commented 4 years ago

Trenutno imaš napovedi izračunane samo do leta 2018. Izračunati jih moraš do želenega leta, npr. 

gg <- data.frame(Leto = seq(2009, 2021, 1))
napoved <- mutate(gg, NapovedanoSteviloDelovnihUr=predict(prilagajanje, gg))

Poleg tega, kot je dejal že @jaanos, je napovedi smiselno prikazati le za leta po 2018. Pred letom 2018 to ni smiselno, saj za ta leta poznaš dejanske podatke.