Mutual information

Greetings,

I wish to know if any R package contains a function to calculate the mutual
information statistic. I already searched the site, but came with my hands
empty. Can anybody help me here?

Thanks,

Gabriel Erbano