Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

Re: Alignment of Graphics Within Expressions

  • To: mathgroup at smc.vnet.net
  • Subject: [mg98944] Re: [mg98874] Alignment of Graphics Within Expressions
  • From: Carl Woll <carlw at wolfram.com>
  • Date: Wed, 22 Apr 2009 05:13:05 -0400 (EDT)
  • References: <200904202312.TAA09654@smc.vnet.net>

David Park wrote:
> Here are two BarCharts within a CirclePlus (but it might be any kind of
> expression). 
>
>  
>
> g1 = BarChart[{1, 2, 3}, Axes -> {True, False},
>
>    BaselinePosition -> Axis,
>
>    Ticks -> None,
>
>    ImageSize -> 40];
>
> g2 = BarChart[{-1, 2, -3},
>
>    BaselinePosition -> Axis,
>
>    Axes -> {True, False},
>
>    Ticks -> None, ImageSize -> 40];
>
> CirclePlus[g1, g2]
>
>  
>
> The x axis of the bar charts are aligned with the baseline (approximately
> the bottom) of the CirclePlus symbol. Would it be possible to align the axes
> with the center line of the CirclePlus symbol without going into any Row
> constructions or modifying the CirclePlus expression?
>
>   
How about:

g1 = BarChart[{1, 2, 3}, Axes -> {True, False},
   BaselinePosition -> Axis -> Center, Ticks -> None, ImageSize -> 40];

g2 = BarChart[{-1, 2, -3}, BaselinePosition -> Axis -> Center,
   Axes -> {True, False}, Ticks -> None, ImageSize -> 40];

CirclePlus[g1, g2]

Carl
>  
>
> David Park
>
> djmpark at comcast.net
>
>  <http://home.comcast.net/~djmpark> http://home.comcast.net/~djmpark/  
>
>  
>
>   



  • Prev by Date: Re: Mathematica in conjunction with outside program; NMinimize fails.
  • Next by Date: Re: Getting the height and width of controls?
  • Previous by thread: pure function with an NIntegrate command
  • Next by thread: Re: pure function with an NIntegrate command