comp.omega | R Documentation |
Computes the vector \vec{\Omega}
, the possibilistic penalty argument for Possibilistic C-Means clustering analysis.
comp.omega(d, u, m=2, pco=NULL, K=1)
d |
a numeric matrix containing the distances of objects to the centers of clusters. |
u |
a numeric matrix containing the fuzzy or possibilistic membership degrees of the data objects. |
pco |
an object of ‘ppclust’ class that contains the results from a clustering algorithm. If it is supplied, there is no need to input the arguments |
m |
a number for the fuzzy exponent. The default is 2. |
K |
a number greater than 0 to be used as the weight of penalty term. The default is 1. |
The vector \vec{\Omega}
is called possibilistic penalty term that controls the variance of clusters (Gosztolya & Szilagyi, 2015). In general, it is computed by using the fuzzy intra cluster distances from a previous run of FCM. This vector of mobilization scale parameters related with the spread of clusters contains the distance values at where membership degrees becomes 0.5 for each cluster (Timm et al, 2004; Wachs et al, 2006; Alamelumangai, 2014).
\vec{\Omega} = K \frac{\sum\limits_{i=1}^n u_{ij}^m \; d^2(\vec{x}_i,\vec{v}_j)}{\sum\limits_{i=1}^n u_{ij}^m}\; ;\; 1\leq j\leq k
Where:
K
is a coefficent, K \in (0,\infty)
. It is generally chosen to be 1.
omega |
a numeric vector containing the mobilization scale values for each cluster. |
Zeynel Cebeci
Alamelumangai N. (2014). Computer aided segmentation of mammary carcinoma on ultrasound images using soft computing techniques. PhD Thesis, Anna Univ., IN. <http://hdl.handle.net/10603/50590>
Wachs, J., Shapira, O., & Stern, H. (2006). A method to enhance the ‘Possibilistic C-Means with Repulsion’ algorithm based on cluster validity index. In Applied Soft Computing Technologies: The Challenge of Complexity, pp. 77-87. Springer, Berlin, Heidelberg. <doi: 10.1007/3-540-31662-0_6>
Gosztolya, G. & Szilagyi, L. (2015). Application of fuzzy and possibilistic c-means clustering models in blind speaker clustering. Acta Polytechnica Hungarica, 12(7):41-56. <http://publicatio.bibl.u-szeged.hu/6151/1/2015-acta-polytechnica.pdf>
pcm
,
pcmr
,
fpcm
,
gkpfcm
,
pfcm
data(iris)
x <- iris[,-5]
# Run FCM
res.fcm <- fcm(x=x, centers=3)
# Compute the mobilization scale values using the results from FCM
vomg1 <- comp.omega(pco=res.fcm)
vomg1
# Compute the mobilization scale values using the distances and memberships from FCM
vomg2 <- comp.omega(res.fcm$d, res.fcm$u, m=3)
vomg2
# Compute the mobilization scale values with the K value of 10
vomg3 <- comp.omega(res.fcm$d, res.fcm$u, m=2, K=10)
vomg3
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.