Create LDA.R

Compute KL divergence for LDA