library(UniversalCVI)
# Iris data
x = iris[,1:4]
# ---- FCM algorithm ----
# Compute all the indices by GC.IDX
FCM.all.GC = GC.IDX(scale(x), cmax = 10, cmin = 2, indexlist = "all",
method = 'FCM', fzm = 2, iter = 100, nstart = 5)
print(FCM.all.GC)
# Compute GC2 index
FCM.GC2 = GC.IDX(scale(x), cmax = 10, cmin = 2, indexlist = "GC2",
method = 'FCM', fzm = 2, iter = 100, nstart = 5)
print(FCM.GC2)
# ---- EM algorithm ----
# Compute all the indices by GC.IDX
EM.all.GC = GC.IDX(scale(x), cmax = 10, cmin = 2, indexlist = "all",
method = 'EM', iter = 100, nstart = 5)
print(EM.all.GC)
# Compute GC2 index
EM.GC2 = GC.IDX(scale(x), cmax = 10, cmin = 2, indexlist = "GC2",
method = 'EM', iter = 100, nstart = 5)
print(EM.GC2)
Run the code above in your browser using DataLab