motion_gram {movementsync}

Motion gram of a view object

Description

Motion gram of a view object

Usage

motion_gram(obj, maxpts = 10000, alpha = 0.5, ...)

Arguments

obj

view object

maxpts

maximum number of points to plot.

alpha

ggplot aesthetic value.

...

passed to ggplot2::geom_point(),

Value

a gtable object.

Examples

r1 <- get_sample_recording()
rv1 <- get_raw_view(r1, "Central", "", "Sitar")
pv1 <- get_processed_view(rv1)
dp <- c("LWrist", "RWrist", "LElbow", "RElbow", "LEye", "REye", "MidHip")
fv1 <- apply_filter_sgolay(pv1, data_point = dp, n = 41, p = 4)
sub_fv1 <- subset(fv1, Time >= 0 & Time <= 20, dp, by = 2)
motion_gram(sub_fv1)