https://github.com/cran/CluMix
Revision dd414a45be07f9c033c980461d041111b898f0a7 authored by Manuela Hummel on 29 December 2016, 10:52:10 UTC, committed by cran-robot on 29 December 2016, 10:52:10 UTC
1 parent a006880
Raw File
Tip revision: dd414a45be07f9c033c980461d041111b898f0a7 authored by Manuela Hummel on 29 December 2016, 10:52:10 UTC
version 1.3.1
Tip revision: dd414a4
dist.variables.R
dist.variables <-
function(data, associationFun=association, check.psd=TRUE){
# data: data.frame of original data 
# associationFun: function that calculates association measure for each pair of variables
# check.psd: check if resulting similarity matrix S is positive semi-definite?

  S <- similarity.variables(data, associationFun=associationFun, check.psd=check.psd)
  D <- as.dist(sqrt(1 - S))
  return(D)
}
back to top