calcFukuyamaSugeno {geocmeans} | R Documentation |
Calculate Fukuyama and Sugeno index of clustering quality
calcFukuyamaSugeno(data, belongmatrix, centers, m)
data |
The original dataframe used for the clustering (n*p) |
belongmatrix |
A membership matrix (n*k) |
centers |
The centers of the clusters |
m |
The fuzzyness parameter |
A float : the Fukuyama and Sugeno index
data(LyonIris) AnalysisFields <-c("Lden","NO2","PM25","VegHautPrt","Pct0_14","Pct_65","Pct_Img", "TxChom1564","Pct_brevet","NivVieMed") dataset <- LyonIris@data[AnalysisFields] queen <- spdep::poly2nb(LyonIris,queen=TRUE) Wqueen <- spdep::nb2listw(queen,style="W") result <- SFCMeans(dataset, Wqueen,k = 5, m = 1.5, alpha = 1.5, standardize = TRUE) calcFukuyamaSugeno(result$Data,result$Belongings, result$Centers, 1.5)