https://github.com/cran/CluMix
Tip revision: a006880878209b1a96d9cdde0332d96fa86036af authored by Manuela Hummel on 03 June 2016, 18:47:22 UTC
version 1.1
version 1.1
Tip revision: a006880
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)
}