Open ZilavecM14 opened 8 years ago
Metoda loess
samo zgladi krivuljo in ne omogoča napovedovanja izven ranga vhodnih podatkov, tako da se tudi krivulja izven tega območja ne izriše.
Kaj pa lahko naredim, da mi zriše še do konca?
Z loess
ne bo šlo. Lahko uporabiš kak drug model, npr. lm
(linearni model) ali gam
(posplošeni aditivni model). V obeh primerih lahko s parametrom formula
podaš obliko formule, h kateri naj se podatki prilegajo (npr. polinom določene stopnje) - poglej si zadnjo vajo na Tomu.
Zanima me zakaj mi v tem primeru noče narisati grafa do leta 2022? novo1 <- studenti %>% filter(vrsta_kratka == "Skupaj") g <- ggplot (novo1, aes(x=leto, y=stevilo))+ xlim(2008,2022) + geom_point() z <- lowess(novo1$leto, novo1$stevilo) g + geom_line(data=as.data.frame(z), aes(x=x, y=y), color="green") loess(data = novo1, stevilo ~ leto, se=FALSE, color="red") g + geom_smooth(method = "loess", size=1, fullrange=TRUE)