New in Wolfram
Mathematica
8: Financial Visualization
◄
previous
|
next
►
Graphics & Visualization
PointFigureChart
Use a point-and-figure chart to compress trends into a single column.
In[1]:=
X
data = FinancialData["IBM", {{2010, 1, 1}, {2010, 6, 30}}];
In[2]:=
X
Column[{PointFigureChart[data, 0.015, ImageSize -> 500, Axes -> {True, False}, Frame -> {{True, True}, {False, True}}, TrendStyle -> "BrownYellow", ChartElementFunction -> "FadingRectangle", ChartBaseStyle -> Directive[AbsoluteThickness[2]]], DateListPlot[data, AspectRatio -> 1/4, ImageSize -> 500, Joined -> True]}]
Out[2]=