Create artistic visualisations with your Strava exercise data
A plot of activities as small multiples. The concept behind this plot was originally inspired by Sisu.
The process for downloading data is described on the Strava website here: [https://support.strava.com/hc/en-us/articles/216918437-Exporting-your-Data-and-Bulk-Export#Bulk], but in essence, do the following:
install.packages(c("devtools", "mapproj", "tidyverse", "gtools"))
devtools::install_github("marcusvolz/strava")
library(strava)
library(tidyverse)
library(gtools)
Note: Strava changed the way that activity files are bulk exported in ~May 2018. If files are exported in ".fit" format they will unfortunately not currently work with process_data.
data <- process_data(<gpx file path>)
p1 <- plot_facets(data)
ggsave("plots/facets001.png", p1, width = 20, height = 20, units = "cm")
p2 <- plot_map(data, lon_min = 144.9, lon_max = 145.73, lat_min = -38.1, lat_max = -37.475)
ggsave("plots/map001.png", p2, width = 20, height = 15, units = "cm", dpi = 600)
Note: Strava changed the way that activity files are bulk exported in ~May 2018. Unfortunately this plot will not work with files exported from Strava after this time.
p3 <- plot_elevations(data)
ggsave("plots/elevations001.png", p3, width = 20, height = 20, units = "cm")
See the following gist: https://gist.github.com/marcusvolz/84d69befef8b912a3781478836db9a75
See the following gist: https://gist.github.com/marcusvolz/854f3bab1f63aa8a938b5026820682fa
Code to come.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.