I would like to make a line graph of lap times, but the way data were collected makes that challenging.
Lap times were stored in a single cell in Excel, delimited by commas.
lap_data <- data.frame( id = c(1L), name = c("David"), laps = c(3L), lap_times = c("33,28,30"))
Which produces this:
id name laps lap_times 1 1 David 3 33,28,30
I would like to reshape it into something like this for ease of plotting:
id name lap lap_time 1 1 David 1 33 2 1 David 2 28 3 1 David 3 30
I can convert the lap time characters into a numeric list using the strapply function from the gsubfn package:
library(gsubfn) lap_data$lap_times <- strapply(data$lap_times, "\\d+", as.numeric) #lap_times now number list id name laps lap_times 1 1 David 3 33, 28, 30
But I don't know how to proceed from here.
Any help would be appreciated. It's not often I'm forced to work with data this funky.