
下面的程式碼產生:
我期望的是:
為什麼 \foreach 似乎將整個列表視為一個值?我如何解決它?
\documentclass{article}
\usepackage{xparse}
\usepackage{xstring}
\usepackage{etoolbox}
\usepackage{expl3}
\usepackage{tikz}
\begin{document}
\ExplSyntaxOn
\DeclareDocumentCommand{\separate}{m}
{
\StrLeft{#1}{1}[\head]
\StrBehind[1]{#1}{\head}[\tail]
\IfInteger{\tail}{\head,\separate{\tail}}{\head}
}
\DeclareDocumentCommand{\map}{m}
{
\def\list{#1}
\foreach \i in \list
{
[\i]
}
}
\ExplSyntaxOff
\def\arg{3669887}
\arg
\separate{\arg}
\map{\separate{\arg}}
\end{document}
答案1
您已經使用了字串在字串中查找,所以你也可以這樣做:
程式碼
\documentclass{article}
\usepackage{xstring}
\usepackage{tikz}
\begin{document}
\def\arg{3669887}
\StrLen{\arg}[\strlen]
\foreach \x in {1,...,\strlen}
{[\StrChar{\arg}{\x}]%
}
\end{document}
輸出
答案2
使用您的程式碼,您基本上所做的與
\foreach \i in {\separate{\arg}}{[\i]}
所以只有一個週期要做。
您必須先分隔字串,然後調用\foreach
,這不能完成這項工作。
我會這樣做:
\documentclass{article}
\usepackage{xparse}
\ExplSyntaxOn
\NewDocumentCommand{\separate}{sm}
{
\IfBooleanTF #1
{
\linus_separate:o { #2 }
}
{
\linus_separate:n { #2 }
}
}
\NewDocumentCommand{\map}{sm}
{
\IfBooleanTF #1
{
\linus_map:o { #2 }
}
{
\linus_map:n { #2 }
}
}
\cs_new_protected:Npn \linus_separate:n #1
{
% split the input into parts "at nothing"
\seq_set_split:Nnn \l_linus_list_seq { } { #1 }
% deliver the input separated by commas
\seq_use:Nnnn \l_linus_list_seq { ,~ } { ,~ } { ,~ }
}
% a variant for a macro input
\cs_generate_variant:Nn \linus_separate:n { o }
\cs_new_protected:Npn \linus_map:n #1
{
% split the input into parts "at nothing"
\seq_set_split:Nnn \l_linus_list_seq { } { #1 }
% deliver the input by enclosing the parts in brackets
\seq_map_inline:Nn \l_linus_list_seq { [##1] }
}
% a variant for a macro input
\cs_generate_variant:Nn \linus_map:n { o }
\ExplSyntaxOff
\begin{document}
\def\arg{3669887}
\arg
\separate*{\arg}
\map*{\arg}
\separate{1234}
\map{1234}
\end{document}
但是您可能不再需要該\separate
功能。當輸入是“符號”時,例如\arg
,與“顯式”輸入時,我會保持不同的巨集;因此這兩通電話\map*
和\map
。