Velocity plot of a view object
velocity_dp(obj, add_mean = TRUE, vscale = 5, maxpts = 10000, alpha = 0.5, ...)
obj
: View object.add_mean
: add the mean to each line? (default is TRUE).vscale
: a vertical scaling to apply to the plot (default is 5).maxpts
: maximum number of points to plot.alpha
: ggplot aesthetic value....
: passed to ggplot2::geom_point()
,a ggplot
object.
r1 <- get_sample_recording() rv1 <- get_raw_view(r1, "Central", "", "Sitar") pv1 <- get_processed_view(rv1) dp <- c("LWrist", "RWrist", "LElbow", "RElbow", "LEye", "REye", "Neck", "MidHip") fv1 <- apply_filter_sgolay(pv1, data_point = dp, n = 41, p = 4) sub_fv1 <- subset(fv1, Time >= 10 & Time <= 20, by = 2) velocity_dp(sub_fv1)
Useful links