100 Hz CSV Processing Examples

Sergey Sandler

2022-01-27

http://catapultr.catapultsports.com - the catapultR package home.

library(catapultR)
suppressMessages(suppressWarnings(library(dplyr)))

Load and display 100 Hz CSV

sCSV <- ofDataFileCSV()
hiFreq <- read_CATcsv(sCSV)
df <- hiFreq$data
if (suppressMessages(suppressWarnings(require("ggplot2"))))
{
    g <- ggplot(df, aes(seq_len(NROW(df)))) + geom_line(aes(y=RawPlayerLoad)) + labs(x = "ticks (cs)", y = "Smoothed PL")
    plot(g)
}