3 lines
78 B
Text
3 lines
78 B
Text
entropy: {(`ln[#x]-(+/{x*`ln@x}@+/{x=\:?x}x)%#x)%`ln@2}
|
|
|
|
entropy "1223334444"
|