R/pearsonCoefficient.R

In juscelino-izidoro/supcavs: Supervised and Unsupervised PCA Variable Selection

Defines functions pearsonCoefficient

Documented in pearsonCoefficient

pearsonCoefficient <-
function(x, y) {
  
  r = abs(cor(x, y, method='pearson'))

  return(r)
}