View source: R/jump_functions.R
add_jump_events | R Documentation |
add_jump_events
uses average hip joint-center height and supplied events to divide a jump into 9 phases.
This division is useful for further analyis of the individual phases in the jump.
The numerical values in phase
column correspond to:
Descending phase of the preparation
The deepest postion in the preparation phase
The ascending phase of the preparation (push-off)
Toe off - the last fase with contact between the feet and the ground
Hang time.
Impact
Descending phase of the landing.
Deepest position of the landing.
Ascending phase of the landing.
add_jump_events(.data)
.data |
A tibble containing motioncapture data from a jump. The data must contain:
|
The tibble supplied in the .data argument
, with the added columns phase
and jump_events
# Prepare data
df <- dplyr::filter(mocapr::mocapr_data, movement_nr == 1)
df <- dplyr::select(df, frame, marks, LHY, RHY)
suppressMessages(add_jump_events(df))
# A plot displaying the phases
df2 <- dplyr::filter(mocapr::mocapr_data, movement_nr == 1)
df2 <- suppressMessages(add_jump_events(df2))
mocapr::animate_global(df2,
planes = "X",
remove_facet_labels = FALSE,
return_plot = TRUE,
col_facets = phase)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.