взаимная информация в R

mutinformation(X, Y, method="emp")
Scary Seal