Как выровнять элементы строки [] в нижней или верхней части в Mathematica?

Question

Когда я пишу

Row[ {Framed@Column[{1,2}], Framed@"123"},  Alignment->Top]

или

Row[ {Framed@Column[{1,2}], Framed@"123"},  Alignment->{Left,Top}]

в любом случае ничего не происходит. По умолчанию установлено выравнивание по центру, а элементы перечислены по срединной линии друг друга.

Grid[ {{Framed@Column[{1,2}], Framed@"123"}}, Alignment->Top]

работает просто отлично, но Grid[] - это перебор, когда достаточно Row[].

Справочная система говорит, что выравнивание должно работать (перечисляет {Left,Baseline} в качестве примера), но, похоже, его нельзя изменить. Я использую v8.0.4.

Answer 1

Как сказал Mr.Wizard, Grid, вероятно, ваш лучший вариант, но если вы хотите использовать Row, вы можете сделать что-то вроде

Row[Pane[#, BaselinePosition -> Top] & /@ {Framed@Column[{1, 2}], Framed@"123"}]

Примечаниечто Framed также имеет опцию BaselinePosition, поэтому для этого конкретного примера вы также можете сделать что-то вроде

Row[Framed[#, BaselinePosition -> Top] & /@ {Column[{1, 2}], "123"}]

, но Pane работает в любом случае.

Answer 2

Параметр Alignment в Row не выравнивает отдельные элементы, а скорее эти элементы внутри внешней ограничительной рамки. Это можно увидеть с помощью:

Framed@Row[{Framed@Column[{1, 2}], Framed@"123"}, 
  ImageSize -> {150, 150}, Alignment -> {Left, Top}]

Framed@Row[{Framed@Column[{1, 2}], Framed@"123"}, 
  ImageSize -> {150, 150}, Alignment -> {Center, Bottom}]

Вместо этого используйте Grid.