Skip to contents

Plot Muscle Synergies

Source: R/emg-plot.R
plotSynergy.Rd

Renders a three-panel figure for a muscle-synergy decomposition: the synergy weight matrix W (heatmap), the activation time courses H, and the VAF curve.

Usage

plotSynergy(x)

Arguments

x

A muscleSynergy() result, or a muscleSynergyOrder() result (whose VAF curve and selected order are used).

Value

A patchwork/ggplot object combining the three panels.

References

Ting, L.H. & Chvatal, S.A. (2010). "Decomposing muscle activity in motor tasks: methods and interpretation." In Motor Control (Oxford).

See also

muscleSynergy(), muscleSynergyOrder()

Examples

set.seed(1)
tt <- seq_len(400)
H <- sapply(c(120, 200, 280), function(c0) exp(-((tt - c0) / 30)^2))
W <- rbind(c(1, 1, 0, 0, 0, 0), c(0, 0, 1, 1, 0, 0), c(0, 0, 0, 0, 1, 1))
data <- H %*% W + matrix(abs(rnorm(400 * 6, sd = 0.02)), 400, 6)
pe <- PhysioExperiment(assays = list(env = data), samplingRate = 1000)
ord <- muscleSynergyOrder(pe, max_synergies = 5, seed = 1)
plotSynergy(ord)