The hardware and bandwidth for this mirror is donated by METANET, the Webhosting and Full Service-Cloud Provider.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]metanet.ch.
Fuzzy Adaptive Resonance Theory K-Means Clustering Technique (FAKMCT)
Alfi Nurrahmah
Alfi Nurrahmah 221810140@stis.ac.id
fakmct : A set of function for clustering data observation with hybrid method Fuzzy ART and K-Means
library(fakmct)
# Using dataset iris
## load data
data.inputs = iris[,-5]
true.labels = as.numeric(unlist(iris$Species))
## run model data
ex.iris<-fakmct(data.inputs, alpha = 0.3, rho = 0.5, beta = 1, max_epochs = 50, max_clusters = 5)
ex.iris$labels
ex.iris$size
ex.iris$centroids
ex.iris$params
## plot data
plot(data.inputs, col = ex.iris$labels, pch = true.labels,
main = paste0("Dataset: Iris"))
# Using data IPM 2019
## load simulate data IPM
data("simulatedataIPM")
dt <- simulatedataIPM
## run model data IPM
mod.fakm<-fakmct(dt, alpha = 0.3, rho = 0.5, beta = 0.1, max_epochs = 50, max_clusters = 5)
mod.fakm$labels
mod.fakm$size
mod.fakm$centroids
mod.fakm$params
## plot data IPM
plot(dt, col = mod.fakm$labels, pch=mod.fakm$labels, main = paste0("Dataset Human Development Index (IPM)"))
These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.