powered by
gaussianKL(N0, N1)
temp <- gaussianKL(gmmpen[[1]]$cov[[1]], gmmpen[[1]]$cov[[2]])
Run the code above in your browser using DataLab