TikZ: \foreach en macro con argumento como lista

Question

El siguiente código genera:

Lo que espero es:

¿Por qué \foreach parece tratar la lista completa como un solo valor? ¿Cómo lo soluciono?

\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}

Answer 1

ya usascadena xpara hurgar en la cuerda, así que también puedes hacerlo así:

Código

\documentclass{article}
\usepackage{xstring}
\usepackage{tikz}

\begin{document}

\def\arg{3669887}

\StrLen{\arg}[\strlen]

\foreach \x in {1,...,\strlen}
{[\StrChar{\arg}{\x}]%
}

\end{document}

Producción

Answer 2

Con tu código básicamente estás haciendo lo mismo que

\foreach \i in {\separate{\arg}}{[\i]}

entonces solo queda un ciclo por hacer.

Primero debes separar la cadena y luego llamar \foreach, lo que no puede hacer ese trabajo.

---

Así es como lo haría:

\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}

\separateSin embargo, probablemente ya no necesites la función. Mantendría distintas las macros cuando la entrada es "simbólica", como por ejemplo \arg, de cuando es "explícita"; así las dos llamadas \map*y \map.