R/SCM.R

In LauraMasiero/RiemannR: RiemannR - EEG-based BCI analysis with Riemannian geometry

Defines functions SCM

Documented in SCM

SCM<- function(matrix){
  t <- ncol(matrix)
  scm <- (t-1)^(-1)*matrix%*%t(matrix)
  return(scm)
}