Quantifies propulsion symmetry after stroke from the anterior-posterior ground
reaction force of each limb: the paretic propulsion Pp is the paretic
propulsive (anterior) impulse divided by the total propulsive impulse of both
limbs (Bowden et al. 2006). A symmetric gait gives Pp = 0.5; reduced paretic
output gives Pp < 0.5.
Examples
set.seed(1)
ap_paretic <- sin(seq(0, 10 * pi, length.out = 1000))
ap_nonparetic <- sin(seq(0, 10 * pi, length.out = 1000)) * 1.3
pipelineStrokePropulsion(ap_paretic, ap_nonparetic, sampling_rate = 100)
#> <stroke_propulsion_report>
#> paretic propulsion Pp: 0.435 (0.5 = symmetric)
#> propulsive impulse: paretic 3.18 / non-paretic 4.13