|
=LET(
|
|
_MainS,A1,
|
|
_N,LEN(_MainS),
|
|
_Chars,UNIQUE(MID(_MainS,SEQUENCE(LEN(_MainS),1,1,1),1)),
|
|
calcH,LAMBDA(_c,(_c/_N)*LOG(_c/_N,2)),
|
|
getCount,LAMBDA(_i,LEN(_MainS)-LEN(SUBSTITUTE(_MainS,_i,""))),
|
|
_CharMap,MAP(_Chars,LAMBDA(a, calcH(getCount(a)))),
|
|
-SUM(_CharMap)
|
|
)
|