Examples

Just a quick first analysis showing the leader at Smågan in different years

For men

library(arrow)
library(dplyr)
vasadata <- read_parquet("https://data.markuskainu.fi/vasaloppetdata/opendata/men_total.parquet")
vasadata %>% 
  group_by(year) %>% 
  filter(split == "Smågan", place_split == 1) %>% 
  select(year,name,time_split) %>% 
  knitr::kable()
year name time_split
2015 Södergren, Anders (SWE) 00:30:49
2016 Gifstad, Thomas (NOR) 00:32:36
2017 Vinje, Vegard (NOR) 00:31:30
2018 Srail, Jan (CZE) 00:33:39
2019 Jonsson, Olle (SWE) 00:36:00
2020 Mäenpää, Viktor (FIN) 00:35:39
2022 Stadaas, Kasper (NOR) 00:28:13
2023 Moen, Vebjörn (NOR) 00:30:54
2024 Syrstad, Torleif (NOR) 00:30:47

For women

vasadata <- read_parquet("https://data.markuskainu.fi/vasaloppetdata/opendata/women_total.parquet")
vasadata %>% 
  group_by(year) %>% 
  filter(split == "Smågan", place_split == 1) %>% 
  select(year,name,time_split) %>% 
  knitr::kable()
year name time_split
2015 Johansson Norgren, Britta (SWE) 00:34:24
2016 Johansson Norgren, Britta (SWE) 00:33:03
2017 Johansson Norgren, Britta (SWE) 00:34:01
2018 Johansson Norgren, Britta (SWE) 00:37:12
2019 Smutna, Katerina (CZE) 00:36:25
2020 Korsgren, Lina (SWE) 00:36:41
2022 Johansson Norgren, Britta (SWE) 00:30:35
2023 Öyre Slind, Astrid (NOR) 00:32:09
2024 Fleten, Emilie (NOR) 00:33:49