Skip to main content
. 2022 Sep 23;24(10):1347. doi: 10.3390/e24101347
Algorithm 1 Estimation of RBFN centers via IF
     Input
  •   •

    Xtrain         % Data to train the RBFN;

  •   •

    α         % Learning rate constant;

  •   •

    n_center         % Number of initial candidates;

  •   •

    δ         % Threshold of Information Potential;

  •   •

    β         % Minimum distance between candidates;

  • max_epochs         % Maximum epochs;

  •   •

    γ         % Constant of convergence;

     Output
  •   •

    Ccluster         % Cluster centers.

1: procedure IF_algorithm(Xtrain,α,n_center,δ,β,max_epochs,γ)
2:
3:     % Pif(·) calculates the information potential.
4:     % Fif(·) calculates the information force.
5:     for i1:n_center do          % Raffle the candidates
6:        Ccand(i)=random(Xtrain);
7:         if Pif(Ccand(i))<δ then
8:            Eliminate Ccand(i);
9:         end if
10:     end for
11:
12:     s=0;
13:     while (s<max_epochs) and (not all Ccandidate are eliminated or converged) do
14:         % Eliminate points to close each other
15:         for i and j1:n_center do
16:            if ||(Ccand(i)Ccand(j))||<β then
17:                Eliminate Ccand(i)
18:            end if
19:         end for
20:
21:         for i1:n_center do             ▹ Update the center candidate.
22:            Ccand(i,s+1)=Ccand(i,s)+αe||Fif(i,s)||Fif(i,s)
23:            if |e||Fif(i,s+1)||e||Fif(i,s)|||<γ then
24:                Ccand(i) converge!
25:            end if
26:         end for
27:         s=s+1
28:     end while
29:     Ccluster=Ccand that converge.
30: return Ccluster
31:
32: end procedure