Skip to contents

Analyze force-plate signals from a PhysioExperiment object

Source: R/kinetics-forceplate.R
analyzeForcePlatePE.Rd

Convenience wrapper for analyzeForcePlate() when force and moment components are stored in PhysioExperiment assays.

Usage

analyzeForcePlatePE(
  pe,
  force_assay = "grf",
  moment_assay = NULL,
  plate_index = 1L,
  sampling_rate = NULL,
  ...
)

Arguments

pe

A PhysioExperiment object.

force_assay

Assay name containing force data with 3 columns (X, Y, Z). If not present, the function tries force_x, force_y, and force_z assays.

moment_assay

Optional assay name containing moments with 3 columns. If not present, the function tries moment_x, moment_y, and moment_z.

plate_index

Which plate to analyze when components are provided as separate assays with multiple force plates. Accepts:

  • numeric scalar (specific plate),

  • "auto" (select plate with largest vertical-force impulse),

  • "all" (analyze all plates and return a multi-plate result).

sampling_rate

Optional sampling rate in Hz. If NULL, uses samplingRate(pe).

...

Additional arguments passed to analyzeForcePlate().

Value

A forceplate_analysis object (single plate) or forceplate_analysis_multi (when plate_index = "all").

References

Winter DA (2009). "Biomechanics and Motor Control of Human Movement." 4th ed. John Wiley & Sons.

See also

analyzeForcePlate() for matrix-based force plate analysis, print.forceplate_analysis() for displaying results.

Examples

n <- 500
z <- matrix(0, n, 1, dimnames = list(NULL, "fp1"))
fz <- matrix(c(rep(0, 100), rep(700, 300), rep(0, 100)), n, 1,
             dimnames = list(NULL, "fp1"))
pe <- PhysioExperiment(assays = S4Vectors::SimpleList(
    force_x = z, force_y = z, force_z = fz,
    moment_x = matrix(50, n, 1, dimnames = list(NULL, "fp1")),
    moment_y = matrix(-100, n, 1, dimnames = list(NULL, "fp1")),
    moment_z = z),
  colData = S4Vectors::DataFrame(label = "fp1", type = "forceplate"),
  samplingRate = 1000)
out <- analyzeForcePlatePE(pe, threshold = 20, cutoff = 20,
  filter_method = "moving_average")
out
#> Forceplate analysis
#>   Stances: 1 
#>   Peak vertical force: 700 
#>   Max loading rate: 13725.49 
#>   Total impulse: 209.945 
#>   Selected plate: 1