Data definition

Gaussian #1

μ1 = {.3, .3} ; RowBox[{RowBox[{Σ1, , =, , RowBox[{.07, RowBox[{{, RowBox[{RowBox[{{, RowBox[{1., ,, -.5}], }}], ,, {-.5, .5}}], }}]}]}], ;}] n1 = 35 ;

Gaussian #2

μ2 = {-.5, -.5} ; RowBox[{RowBox[{Σ2, , =, , RowBox[{.04, RowBox[{{, RowBox[{RowBox[{{, RowBox[{1., ,, .5}], }}], ,, {.5, .5}}], }}]}]}], ;}] n2 = 25 ;

Data domain

pr = {{-1, 1}, {-1, 1}} ;

Created by Mathematica  (September 8, 2003)