This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# snow.R: Plot snow depths for Helsinki winters | |
# Ilari Scheinin | |
# firstname.lastname@gmail.com | |
# MIT License | |
library(dplyr) | |
library(fmi) | |
library(ggplot2) | |
library(lubridate) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# Ranking NHL’s best shooters with Bayesian multilevel modeling | |
# https://ilari.scheinin.fi/ranking-nhls-best-shooters/ | |
# Ilari Scheinin | |
# firstname.lastname@gmail.com | |
# Code: MIT Licence | |
# Figures and tables: CC-BY | |
# For inclusion in the blog post, the main code is split into snippets in | |
# separate files named like *-chunk.R. | |
# This file exists purely for the boilerplate above, and for running the entire |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# plot_dist.R: convenience function for plotting distribution shapes. | |
# Ilari Scheinin | |
# firstname.lastname@gmail.com | |
# 2016-11-17 | |
# MIT License | |
# distribution: a density or distribution function, such as dnorm, pbeta, ... | |
# parameters: a (possibly named) vector of parameters for the | |
# density/distribution function |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
library(pxweb) | |
library(dplyr) | |
library(stringr) | |
library(tidyr) | |
library(ggplot2) | |
library(animation) | |
api <- "http://pxnet2.stat.fi/PXWeb/api/v1/" | |
past_original <- get_pxweb_data( |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
library(pxweb) | |
library(dplyr) | |
library(ggplot2) | |
api <- "http://pxnet2.stat.fi/PXWeb/api/v1/" | |
pension_fees <- get_pxweb_data( | |
url=paste0(api, "en/StatFin/jul/vermak/102_vermak_tau_120.px"), | |
dims=list(Verolaji = c("D61111_TYO", "D61121_TYO"), Sektori = c("S13141"), | |
Tieto = c("Suhde1"), Vuosi = c("*")), |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
library(pxweb) | |
library(dplyr) | |
library(stringr) | |
library(ggplot2) | |
library(animation) | |
api <- "http://pxnet2.stat.fi/PXWeb/api/v1/" | |
past_original <- get_pxweb_data( | |
url=paste0(api, "en/StatFin/vrm/vaerak/125_vaerak_tau_106.px"), |