New in Wolfram
Mathematica
8: Capacidad de visualización de información nueva y mejorada
◄
previous
|
next
►
Gráficos y visualización
Cree diagramas de matrices de transformadas de óndulas discretas
Cree un diagrama de matrices del árbol de base de los coeficientes de matriz de óndula para la transformada discreta de óndula de una carita smiley.
In[1]:=
X
WaveletMatrixPlot[DiscreteWaveletTransform[ImageData[\!\(\* GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztlU0KwjAQhafiwmt4AFeeQI9QT9CC3QpVkN7eiD9N5r2ZjAvBhQMpmbyv L+k0Iev+1A4LETmv0qPtrrtx7KbDMiX76XLs79I2tU1qjQ6ZAzSTrPGAOriS PZwpFv3JsL0+Yz7vU6KwFiMlDbIPgPVr1oF9UMI+m/kF4DcTYSlcvMgS2Ggs eVJQ8K/A1SRUjBf9h38O1psOkdy4CpdnrziMbKEmLAA3BqxpQR/c8KK6uQ2e lTlgjuL48NvKXioGn8SBeeIb16y16tGo2TRTdLF8F0pbFvrqJgMUp388gpso 4Fq8AbIODnA= "], {{0, 51}, {45, 0}}, {0, 1}, ColorFunction->GrayLevel], BoxForm`ImageTag["Bit", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], BaseStyle->"ImageGraphics", ImageSizeRaw->{45, 51}, PlotRange->{{0, 45}, {0, 51}}]\)], Automatic, 3], ColorFunction -> "GreenPinkTones", ImageSize -> 550]
Out[1]=