Strava

Create artistic visualisations with your Strava exercise data

Examples

Facets

A plot of activities as small multiples. The concept behind this plot was originally inspired by Sisu.

Map

Elevations

Calendar

Ridges

Packed circles

How to use

Bulk export from Strava

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:

1. Log in to Strava
2. Select "Settings" from the main drop-down menu at top right of the screen
3. Select "My Account" from the navigation menu to the left of the screen.
4. Under the "Download or Delete Your Account" heading, click the "Get Started" button.
5. Under the "Download Request", heading, click the "Request Your Archive" button. Don't click anything else on that page, i.e. particularly not the "Request Account Deletion" button.
6. Wait for an email to be sent
7. Click the link in email to download zipped folder containing activities
8. Unzip files

Install the packages

install.packages(c("devtools", "mapproj", "tidyverse", "gtools"))
devtools::install_github("marcusvolz/strava")

Load the libraries

library(strava)
library(tidyverse)
library(gtools)

Process the data

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>)

Plot activities as small multiples

p1 <- plot_facets(data)
ggsave("plots/facets001.png", p1, width = 20, height = 20, units = "cm")

Plot activity map

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)

Plot elevation profiles

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")

Plot Calendar

See the following gist: https://gist.github.com/marcusvolz/84d69befef8b912a3781478836db9a75

Plot Ridges

See the following gist: https://gist.github.com/marcusvolz/854f3bab1f63aa8a938b5026820682fa

Plot Ridges

Code to come.