Services & ResourcesWolfram ForumsMathGroup Archive

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

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/  
>
>  
>
>   

• References:
  • Alignment of Graphics Within Expressions
    • From: "David Park" <djmpark@comcast.net>