如何独立于其他对齐网格中的第一列和第一行?

Ale*_*kov 4 wolfram-mathematica mathematica-frontend

如何为第一列(不包括该列中的第一行)、第一行(不包括该行中的第一个元素)以及 中的所有其他元素指定单独的对齐方式Grid?最好仅通过保留严格控制Alignment的选项来执行此操作,该选项由用于更严格目的的选项提供。GridItem[]Alignment

PS 这个问题来自上一个问题,但我希望在这里单独控制水平和垂直表格标题的对齐方式。

Ale*_*kov 5

我找到了几种方法来实现我想要的。最直接的解决办法是:

Grid[Table[Row@(Range[a]), {a, 1, 4}, {7}], 
 Alignment -> {Right, 
   Automatic, {{{2, -1}, {1, 1}} -> Left, {{1, 1}, {2, -1}} -> 
     Center}}, Dividers -> {{2 -> True}, {2 -> True}}]
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述

其他解决方案包括:

Grid[Table[Row@Range[a], {a, 1, 4}, {7}], 
 Alignment -> {{Left, {Right}}, 
   Automatic, {{1, 1}, {1, -1}} -> Center}, 
 Dividers -> {{2 -> True}, {2 -> True}}]
Grid[Table[Row@Range[a], {a, 1, 4}, {7}], 
 Alignment -> {Right, 
   Automatic, {1 -> Left, {{1, 1}, {2, -1}} -> Center}}, 
 Dividers -> {{2 -> True}, {2 -> True}}]
Grid[Table[Row@Range[a], {a, 1, 4}, {7}], 
 Alignment -> {Right, 
   Automatic, {1 -> Left, {{1, 1}, {1, -1}} -> Center}}, 
 Dividers -> {{2 -> True}, {2 -> True}}]
Grid[Table[Row@Range[a], {a, 1, 4}, {7}], 
 Alignment -> {Right, 
   Automatic, {{{1, 1}, {1, -1}} -> Center, 1 -> Left}}, 
 Dividers -> {{2 -> True}, {2 -> True}}]
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述