Gaussian pdfs

μ1 = Mean[data1] ; Σ1 = CovarianceMatrix[data1] ;  μ2 = Mean[data2] ; & ... df3D[μ1, Σ1] // ExpandAll // N ; lpdf2 = logpdf3D[μ2, Σ2] // ExpandAll // N ;

Created by Mathematica  (September 8, 2003)