Новое в системе Wolfram
Mathematica
8: Финансовая визуализация
◄
предыдущая
|
следующая
►
Графика и визуализация
Диаграмма Каги
Использование диаграммы Каги для идентификации разворотов, выходящих за предыдущую точку изменения.
In[1]:=
X
data = FinancialData["MSFT", {{2010, 1}, {2010, 5, 30}}];
In[2]:=
X
Column[{KagiChart[data, 0.01, ImageSize -> 500, Axes -> {True, False}, Frame -> {{True, True}, {False, True}}, TrendStyle -> "BlueYellow", ChartBaseStyle -> Directive[AbsoluteThickness[5]]], DateListPlot[data, Joined -> True, AspectRatio -> 1/4, ImageSize -> 500]}, Spacings -> {1, 0}]
Out[2]=