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