Skip to main content
. 2023 Jan 26;23(3):1368. doi: 10.3390/s23031368
Algorithm 2: Basic soft thresholding operator (Version 1)
Input: X˜1,,X˜F,σ
  • 1:

    X10,,XF0, W10,,WF0

  • 2:

    for f=1,,Fdo

  • 3:

       for i=1,,WN do

  • 4:

         for j=1,,HN do

  • 5:

            Rgetblock(X˜f,i,j,N)

  • 6:

            {B1,v1,,BF,vF}HME(i,j,R,X˜1,,X˜F)

  • 7:

            {[B^1;;B^F],γ}wiener([B1;;BF],σ)

  • 8:

            for n=1,,F do

  • 9:

              {S,E}insert(B^n,vn)

  • 10:

              XnXn+γS

  • 11:

              WnWn+γE

  • 12:

            end for

  • 13:

         end for

  • 14:

       end for

  • 15:

    end for

  • 16:

    for f=1,,Fdo

  • 17:

       X^fXf/Wf

  • 18:

    end for