☰

Eliminar duplicados de una lista de cadenas separadas por comas

tag-icon • tag-icon programming strings comma-separated-list
Eliminar duplicados de una lista de cadenas separadas por comas

Este es un seguimiento de Diferencia en el tiempo de compilación entre dos versiones ligeramente diferentes.

Como resultó obvio al hacer esa pregunta, la velocidad de esa compilación se ve seriamente afectada por la longitud de la lista separada por comas \ReferencedID. Esta es la lista de las etiquetas recopiladas del texto. Pero esta lista puede contener duplicados y, de hecho, en el ejemplo de mi pregunta, los contiene. Entonces, ¿cómo se pueden eliminar duplicados de una lista separada por comas?

Para ser más concretos, la lista es mi ejemplo:

\gdef \ReferencedIDs{,2014.11.14,2014.11.14,2014.11.17,2014.11.14,2014.07.18.tm,2014.11.12.tm,2013.10.05.kanjur,2013.10.05.powai,2013.10.06,2013.10.28.zhm,2013.10.17,2013.10.22,2013.10.14.ks,2013.10.06,2013.10.17,2013.10.22,2013.10.24,2013.10.28,2013.10.30,2013.11.11,2014.09.05.tm,2014.07.18.tm,2014.11.12.tm,2014.11.17,2015.01.06,2015.01.06}

Respuesta1

Suponiendo que \ReferencedIDsya se ha formado como una lista separada por comas, puede combinar las macros que ya he mostrado enseqsplit no funciona a menos que la cadena se proporcione directamente como argumento

\documentclass[12pt]{article}
\usepackage[T1]{fontenc}

\usepackage{seqsplit}
\usepackage{xparse}

\ExplSyntaxOn
\cs_set_eq:NN \faheem_seqsplit:n \seqsplit
\cs_generate_variant:Nn \faheem_seqsplit:n { V }
\clist_new:N \l_faheem_referenced_ids_clist

\NewDocumentCommand{\printIDs}{s}
 {
  \clist_set:NV \l_faheem_referenced_ids_clist \ReferencedIDs
  \IfBooleanF{#1}
  { \clist_remove_duplicates:N \l_faheem_referenced_ids_clist }
  \faheem_seqsplit:V \l_faheem_referenced_ids_clist
 }
\ExplSyntaxOff

\def\ReferencedIDs{,2014.11.14,2014.11.14,2014.11.17,2014.11.14,2014.07.18.tm,%
  2014.11.12.tm,2013.10.05.kanjur,2013.10.05.powai,2013.10.06,2013.10.28.zhm,%
  2013.10.17,2013.10.22,2013.10.14.ks,2013.10.06,2013.10.17,2013.10.22,2013.10.24,%
  2013.10.28,2013.10.30,2013.11.11,2014.09.05.tm,2014.07.18.tm,2014.11.12.tm,%
  2014.11.17,2015.01.06,2015.01.06}


\begin{document}

This is the original list with duplicates, \printIDs*

Here is the list with duplicates removed, \printIDs

\end{document}

ingrese la descripción de la imagen aquí

Respuesta2

Gracias a Joseph Wright por mostrarme cómo hacer esto usando expl3. El siguiente código se explica en gran medida por sí mismo. La línea que elimina los duplicados es

\clist_remove_duplicates:N \l_ReferencedIDs

Para obtener documentación, consulte el interface3.pdfarchivo, que se encuentra en TeX Live, al menos, con extensión texdoc interface3.

\documentclass[12pt]{article}
\usepackage{seqsplit}
\usepackage{expl3}
\usepackage[T1]{fontenc}
\let\oldseqsplit\seqsplit% Copy \seqsplit
\renewcommand{\seqsplit}{% Redefine \seqsplit to...
\expandafter\oldseqsplit\expandafter}% ...expand its argument before processing it

\gdef \ReferencedIDs{,2014.11.14,2014.11.14,2014.11.17,2014.11.14,2014.07.18.tm,2014.11.12.tm,2013.10.05.kanjur,2013.10.05.powai,2013.10.06,2013.10.28.zhm,2013.10.17,2013.10.22,2013.10.14.ks,2013.10.06,2013.10.17,2013.10.22,2013.10.24,2013.10.28,2013.10.30,2013.11.11,2014.09.05.tm,2014.07.18.tm,2014.11.12.tm,2014.11.17,2015.01.06,2015.01.06}
\ExplSyntaxOn
\clist_set:NV \l_ReferencedIDs \ReferencedIDs % initialise list
\clist_remove_duplicates:N \l_ReferencedIDs % remove duplicates
\gdef \DeduplicatedReferencedIDs{\l_ReferencedIDs}
\ExplSyntaxOff

\begin{document}

This is the original list with duplicates, \seqsplit{\ReferencedIDs}.

Here is the list with duplicates removed, \seqsplit{\DeduplicatedReferencedIDs}.

\end{document}

NOTA: El \seqsplit{\DeduplicatedReferencedIDs}no se envuelve correctamente; No sé por qué.

información relacionada