2013-06-11 2 views

답변

0

어때?

a = SmoothDensityHistogram[ 
    RandomVariate[BinormalDistribution[0.3], 10], Mesh -> 3, 
    MeshStyle -> Red, ColorFunction -> None]; 
b = SmoothDensityHistogram[ 
    RandomVariate[BinormalDistribution[0.6], 10], Mesh -> 3, 
    MeshStyle -> Blue, ColorFunction -> None]; 
Show[ 
a /. GrayLevel[_] -> Opacity[0], 
b /. GrayLevel[_] -> Opacity[0], 
ImageSize -> 300] 

enter image description here

관련 문제