Re: financial chart with volumes
- To: mathgroup at smc.vnet.net
- Subject: [mg93730] Re: financial chart with volumes
- From: appris at att.net
- Date: Mon, 24 Nov 2008 04:13:44 -0500 (EST)
- References: <gg8pf6$k1d$1@smc.vnet.net>
Here is a revision to the earlier post - I missed the "close" price.
With the following, Blue symbol is opening price and "Red" is the
closing price.
DateListPlot[{FinancialData["GE", "Low", {{2006, 1}, {2006, 2}}],
FinancialData["GE", "High", {{2006, 1}, {2006, 2}}],
FinancialData["GE", "Open", {{2006, 1}, {2006, 2}}],
FinancialData["GE", "Close", {{2006, 1}, {2006, 2}}]},
Filling -> {1 -> {2}}, Mesh -> All, FillingStyle -> Red,
PlotStyle -> {{PointSize[0.01], Black}, {PointSize[0.01],
Black}, {PointSize[0.01], Blue}, {PointSize[0.01], Red}},
ImageSize -> 500]