Skip to contents

Compares corticomuscular coherence (CMC) and directional coupling between two timepoints to quantify neural adaptation during rehabilitation.

Usage

mskNeuralAdaptationIndex(
  cmc_t0,
  cmc_t1,
  directional_t0 = NULL,
  directional_t1 = NULL
)

Arguments

cmc_t0

CMC result at baseline (MSKNeuromechCMC object or coherence matrix).

cmc_t1

CMC result at follow-up.

directional_t0

Directional coupling at baseline (MSKNeuromechDirectional object or NULL).

directional_t1

Directional coupling at follow-up (or NULL).

Value

A list with: cmc_change, directional_change, adaptation_index, interpretation ("improving"/"stable"/"declining").

Examples

set.seed(1)
cmc_t0 <- matrix(abs(rnorm(9)), 3, 3)
cmc_t1 <- matrix(abs(rnorm(9)), 3, 3)
nai <- mskNeuralAdaptationIndex(cmc_t0, cmc_t1)
nai
#> $cmc_change
#> [1] 0.7545965
#> 
#> $directional_change
#> [1] 0
#> 
#> $adaptation_index
#> [1] 0.1089252
#> 
#> $interpretation
#> [1] "improving"
#>