嵌套画面

Question

编辑 ：我添加了一些示例来说明我想要做的事情。

我希望能够绘制嵌套的 Young 画面。有关 Young 画面的定义，请参阅https://en.wikipedia.org/wiki/Young_tableau。我所说的嵌套是指 tableau 单元格的内容本身就是一个 tableau。例如，我的结果应该是这样的：

一般来说，行和列的长度可以是任意的。下面是另一个示例来说明我想要做的事情：

因为我也想要小报和专栏小报，所以我使用此答案中的方法（而不是包 ytableau 或 genyoungtabtikz）绘制我的画面：

列式小报与行式小报

但是，我不习惯使用 tikz，它不能像我希望的那样工作。我的第一个示例有一个最小代码（我使用了 \Tableau 和 \PTableau，这样计算机就不会混淆这两种方法）：

\documentclass{article}

\usepackage{tikz}

\newcount\tableauRow\newcount\tableauCol
\newcommand\Tableau[2]{%
  \begin{tikzpicture}[scale=#2,draw/.append style={thick,black},baseline=-4mm]
    \tableauRow=0
    \foreach \Row in {#1} {
       \tableauCol=1
       \foreach\k in \Row {
          \draw(\the\tableauCol,\the\tableauRow)+(-.5,-.5)rectangle++(.5,.5);
          \draw(\the\tableauCol,\the\tableauRow)node{\k};
          \global\advance\tableauCol by 1
       }
       \global\advance\tableauRow by -1
    }
  \end{tikzpicture}
}
\newcommand\PTableau[2]{%
  \begin{tikzpicture}[scale=#2,draw/.append style={thick,black},baseline=-4mm]
    \tableauRow=0
    \foreach \Row in {#1} {
       \tableauCol=1
       \foreach\k in \Row {
          \draw(\the\tableauCol,\the\tableauRow)+(-.5,-.5)rectangle++(.5,.5);
          \draw(\the\tableauCol,\the\tableauRow)node{\k};
          \global\advance\tableauCol by 1
       }
       \global\advance\tableauRow by -1
    }
  \end{tikzpicture}
}

\begin{document}

\[
\PTableau{{\Tableau{{1,2},{3,4}}{0.5},\Tableau{{5,6},{7,8}}{0.5}}}{1.5}
\]

\end{document}

使用此代码，结果看起来是这样的，而不是我想要的（由于计算机问题，我画了它，但它说明了问题）：

我应该对 \PTableau 进行哪些修改才能获得我想要的结果？最重要的是，为什么？

Answer 1

不确定输出是否如您所想象的那样，但是这里有一种方法，使用\pic并非真正嵌套而是相互堆叠的 s，以便结果看起来像是嵌套的：

\documentclass[border=10pt]{standalone}
\usepackage{tikz}

\tikzset{
    pics/tableau/.style={
        code={
            \tikzset{tableau/.cd, #1}
            \pgfmathsetmacro{\s}{\pgfkeysvalueof{/tikz/tableau/size}*1pt}
            \pgfmathsetmacro{\c}{\pgfkeysvalueof{/tikz/tableau/cols}}
            \begin{scope}[
                shift={(\pgfkeysvalueof{/tikz/tableau/at})},
            ]
                \foreach \n [count=\i from 0] in \tableaulist {
                    \path[\ifx\n\empty\else draw\fi] 
                        ({mod(\i,\c)*\s},{int(-1*\i/\c)*\s})
                            coordinate (-\i)
                            rectangle ++({\s},{-1*\s})
                            node[pos=0.5] (-n\i) { \n };
                }
            \end{scope}
        }
    },
    tableau/list/.store in=\tableaulist,
    tableau/list/.initial={1},
    tableau/cols/.initial={2},
    tableau/size/.initial={1},
    tableau/at/.initial={0,0}
}

\begin{document}
\begin{tikzpicture}

\pic (A) {tableau={list={1,{},9,10,11,{},12,{},20}, cols=3}};

\pic[tableau/size=0.5] (B) {tableau={list={2,3,{},8}, cols=2, at=A-1}};

\pic[tableau/size=0.25, font=\tiny] 
    {tableau={list={4,5,6,7}, cols=2, at=B-2}};

\pic[tableau/size=0.333, font=\tiny] 
    {tableau={list={13,14,15,16,17,18,{},{},19}, cols=3, at=A-7}};

\end{tikzpicture}
\end{document}