The macro which can calculate the entropy

[#1]

I have wrote a macro which can calculate the entropy of the character variable;

The row_data is where the data is and the destination is the goal variable.

If you use this macro in the other place, please note 'wrote by Albert.feng from China.'