Re: 3D bar graph in Mathematica 6?
- To: mathgroup at smc.vnet.net
- Subject: [mg76344] Re: 3D bar graph in Mathematica 6?
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Sun, 20 May 2007 02:25:47 -0400 (EDT)
- Organization: The Open University, Milton Keynes, UK
- References: <f2mdj3$ks6$1@smc.vnet.net>
Gordon Robertson wrote:
> I apologize if I've simply not found something that is available in
> v6, but after spending some time trying plotting tools listed on the
> 'Data Visualization' ToC in the new help browser, I do not see how to
> plot a 3D bar graph, from a matrix of z (height) values. I'd prefer
> also to assign text labels to X and or Y tic marks. Is this simple
> functionality available?
>
> Thank you -
> G
> --
> Gordon Robertson
> Canada's Michael Smith Genome Sciences Centre
> Vancouver BC Canada
The following code should help you. Note that you need to load the
package BarCharts first, then you can customize BarChart3D with the
option Ticks that accepts a list of lists of lists of the form {{{pos
1st x-tick, "value"},{pos 2nd x-tick, "value"},...},{{pos 1st y-tick,
"value},...}}
Needs["BarCharts`"]
heights = {{1, 6, 8}, {2, 7, 1}, {3, 1, 4}};
BarChart3D[heights,
Ticks -> {{{1, "1990"}, {2, "2000"}, {3, "2010"}},
{{1, "A"}, {2, "B"}, {3, "C"}}},
TicksStyle -> Directive[Orange, 12]]
Regards,
Jean-Marc