Return to Answer

deleted 20 characters in body; edited body

Source Link

edited Jul 3, 2012 at 3:46

273.1k
34
595
1.4k

Show[ListPlot3D[CorrelationMatrixShow[
  ListPlot3D[correlationMatrix,
    AxesStyle -> Thickness[0.01], 
                AxesLabel -> {"X", "Y", "Corr(X,Y)"}, 
                AxesEdge -> {{-1, -1}, {-1, -1}, {-1, -1}}, 
                ColorFunction -> "BrightBands"], 
    ListPointPlot3D@
       ListPointPlot3D @ Tooltip @ Flatten[
    Tooltip@Flatten[MapIndexed[Flatten@MapIndexed[Flatten@{#2, #1} &, CorrelationMatrixcorrelationMatrix, {2}], 1]]1]
]

enter image description here

Show[ListPlot3D[CorrelationMatrix, AxesStyle -> Thickness[0.01], 
                AxesLabel -> {"X", "Y", "Corr(X,Y)"}, 
                AxesEdge -> {{-1, -1}, {-1, -1}, {-1, -1}}, 
                ColorFunction -> "BrightBands"], 
    ListPointPlot3D@
               Tooltip@Flatten[MapIndexed[Flatten@{#2, #1} &, CorrelationMatrix, {2}], 1]]

enter image description here

Show[
  ListPlot3D[correlationMatrix,
    AxesStyle -> Thickness[0.01], 
    AxesLabel -> {"X", "Y", "Corr(X,Y)"}, 
    AxesEdge -> {{-1, -1}, {-1, -1}, {-1, -1}}, 
    ColorFunction -> "BrightBands"], 
  ListPointPlot3D @ Tooltip @ Flatten[
    MapIndexed[Flatten@{#2, #1} &, correlationMatrix, {2}], 1]
]

enter image description here

Source Link

created Jul 2, 2012 at 20:11

Dr. belisarius

116.2k
13
205
456

Show[ListPlot3D[CorrelationMatrix, AxesStyle -> Thickness[0.01], 
                AxesLabel -> {"X", "Y", "Corr(X,Y)"}, 
                AxesEdge -> {{-1, -1}, {-1, -1}, {-1, -1}}, 
                ColorFunction -> "BrightBands"], 
    ListPointPlot3D@
               Tooltip@Flatten[MapIndexed[Flatten@{#2, #1} &, CorrelationMatrix, {2}], 1]]

enter image description here