使用 Stackengine 枚举项目的二进制代码索引

Question

第1部分

\makeballs在的定义中，递归参数需要用括号括起来\makeballs。如果没有括号，任何两位数参数都会导致意外结果。我还在\expandafter同一个位置添加了一个链，以便递归传递一个干净的数字而不是关系\numexpr。

\documentclass{article}
\textheight 8.25in \textwidth 4.75in

\usepackage{stackengine,xcolor,lipsum}
\let\svitem\item
\newcommand\difbox[1]{\stackengine{0pt}{\color{white}\rule{5ex}{1.15ex}}{%
    \color{blue!35}$\mkern1mu\makeballs{#1}%
    \textcolor{red}{\makeballs{\the\numexpr12-#1\relax}}$}{O}{c}{F}{F}{L} }
\def\makeballs#1{\ifnum#1>0\relax{\bullet}%
  \expandafter\makeballs\expandafter{\the\numexpr#1-1\relax}\fi}% <--FIX HERE
\newenvironment{benumerate}
{\renewcommand\item[1][1]{\def\difficulty{##1}\svitem}%
  \def\labelenumi{\smash{\stackunder[4pt]{\color{blue!65!black}%
  \bfseries\sffamily\theenumi}{\difbox{\difficulty}}}}%
  \enumerate}{\endenumerate}

    \begin{document}
    \large
    \begin{benumerate}
    \setcounter{enumi}{0}
    \item[9] \lipsum[11]
    \item[4] \lipsum[39]
    \item[11] \lipsum[13]
    \item[1] \lipsum[13]
    \end{benumerate}
    \end{document}

第2部分

至于更大的问题，即选择自己的红球和蓝球序列，我改变策略并让用户使用由R和B标记组成的字符串来指定红色/蓝序列。

这里，\makeballsnow 接受输入字符串作为参数，并剥离第一个标记，用它来决定红色或蓝色。然后，它递归地将其余输入标记传递回自身，直到列表耗尽。

\documentclass{article}
\textheight 8.25in \textwidth 4.75in

\usepackage{stackengine,xcolor,lipsum}
\let\svitem\item
\newcommand\difbox[1]{\stackengine{0pt}{\color{white}\rule{5ex}{1.15ex}}{%
    $\iftrue\makeballs#1\fi$}{O}{c}{F}{F}{L} }
\def\makeballs#1#2\fi{\fi\ifx R#1\textcolor{red}{\bullet}\else
  \ifx B#1\textcolor{blue!35}{\bullet}\fi\fi%
  \ifx\relax#2\relax\else\makeballs#2\fi}
\newenvironment{benumerate}
{\renewcommand\item[1][1]{\def\difficulty{##1}\svitem}%
  \def\labelenumi{\smash{\stackunder[4pt]{\color{blue!65!black}%
  \bfseries\sffamily\theenumi}{\expandafter\difbox\expandafter{\difficulty}}}}%
  \enumerate}{\endenumerate}

    \begin{document}
    \large
    \begin{benumerate}
    \setcounter{enumi}{0}
    \item[RB] \lipsum[11]
    \item[RRRBBBB] \lipsum[39]
    \item[RBBRRRRBRB] \lipsum[13]
    \end{benumerate}
    \end{document}

\difbox注意：球上的数字不居中是由于 OP 在定义 ( )末尾插入了额外的空格{O}{c}{F}{F}{L} }。我把它留在那里，可能是 OP 的本意。但是删除该空格将导致数字位于球的中央。

第三部分

第 3 部分有点棘手。在这里，我需要提前（在中）构建球堆栈的参数\tmp，然后将其传递给\Shortstack。幸运的是，\makeballs在这方面是可扩展的，只要我将其应用于\noexpand的实例\textcolor（以及可选的\bullet）。

除了球规范中的R和标记之外，我现在还使用来表示换行符。B.

\documentclass{article}
\textheight 8.25in \textwidth 4.75in

\usepackage{stackengine,xcolor,lipsum}
\setstackEOL{\\}
\let\svitem\item
\newcommand\difbox[1]{\edef\tmp{$\iftrue\makeballs#1\fi$}%
  \stackengine{0pt}{\color{white}\rule{5ex}{1.15ex}}{%
    \expandafter\Shortstack\expandafter{\tmp}}{O}{c}{F}{F}{L} }
\def\makeballs#1#2\fi{\fi\ifx R#1\noexpand\textcolor{red}{\noexpand\bullet}\else
  \ifx B#1\noexpand\textcolor{blue!35}{\noexpand\bullet}\else
  \ifx .#1$\\$\fi\fi\fi%
  \ifx\relax#2\relax\else\makeballs#2\fi}
\newenvironment{benumerate}
{\renewcommand\item[1][1]{\def\difficulty{##1}\svitem}%
  \def\labelenumi{\smash{\stackunder[4pt]{\color{blue!65!black}%
  \bfseries\sffamily\theenumi}{\expandafter\difbox\expandafter{\difficulty}}}}%
  \enumerate}{\endenumerate}

    \begin{document}
    \large
    \begin{benumerate}
    \setcounter{enumi}{0}
    \item[RB.RR] \lipsum[11]
    \item[RRRB.BBBR] \lipsum[39]
    \item[RBBR.RRRB.RBBR] \lipsum[13]
    \end{benumerate}
    \end{document}

Answer 1