MathGroup Archive 1995

[Date Index] [Thread Index] [Author Index]

Search the Archive

BarCharts and vertical axes origin

  • To: MATHGROUP at CHRISTENSEN.Cybernetics.NET
  • Subject: [mg496] BarCharts and vertical axes origin
  • From: rrigon at zeus.tamu.edu (Riccardo Rigon)
  • Date: Tue, 28 Feb 1995 15:00:16 +0100

Dear Mathgrouper, I am facing with the problem to draw bar charts of
quantities whose value is close. BarChart put the beginning
of the vertical axis at 0 and automatically squeezes the differecences I need
on the contrary to emphasize. Does anybody has had the same problem ?

The feature I like in BarChart is the possibility to have non numerical
abscissas. In other case I would have used FilledListPlot (* In
Graphics`FilledPlot *) after having properly
preprocessed my data:

data={-0.825, -0.925, -0.825, -0.825, -0.675, -1.025, -0.875,

  -0.975, -0.975, -0.825};

cl=Frequencies[data]; (* In Statistics`DataManipulation` *)
delta=0.025;
bottomvalue=0.5;

preprodata=Flatten[{{#[[1]]-delta,bottomvalue},
 {#[[1]]-delta+delta/100.,#[[2]]},
 {#[[1]]+delta-delta/100.,#[[2]]},
 {#[[1]]+delta,bottomvalue}}& /@ cl,1];

ListFilledPlot[preprodata,PlotJoined->True,PlotRange->{0,5},
Axes->False,Frame->True]


In my BarChart-histogram I would also put the possibility to: i) label each
bar; ii) color each bar according to a list of weights (this is useful if
you want to plot some fitted values which have different regression
coefficients and you do not want to lose this informations).


Thank you in advance for any help or suggestion.



Riccardo Rigon, Ph. D.

Civil Egineering Department
Texas A&M University
College Station, TX 77843
ph:  (409)-845-0335
fax: (409)-862-1542
e-mail: rrigon at zeus.tamu.edu




  • Prev by Date: Remote Kernel
  • Next by Date: Re: problem with Mathematica
  • Previous by thread: Re: Remote Kernel
  • Next by thread: ConstrainedContourPlot