speedskate: 2018 MarbleLympics speed skating times

In AkselA/R-ymse: Ymse (Various)

Description

Intermediate and total times for all 16 runs, arranged by lane and heat number.

Usage

speedskate

Format

A list containing two data.frames, one for each lane. Columns are heat and rows are time checks in seconds.

Source

https://www.youtube.com/watch?v=fA-O6f_jArk

Examples

tt <- t(do.call(cbind, speedskate))
pairs(tt)
cor(tt)
outer(
  colnames(tt), 
  colnames(tt), 
  Vectorize(function(i,j) cor.test(tt[,i],tt[,j])$p.value)
)

AkselA/R-ymse documentation built on March 21, 2020, 9:52 a.m.