获取图片标题，创建个性化图片列表

Question

我想建立一个非常简单的数字列表（根据剑桥期刊）。应按顺序排列数字，即按出现的顺序排列。首先是所有图表，然后是表格。

我实际使用的代码很琐碎而且重复（就像在 Journal 示例中一样）：

\documentclass[a4paper, 11pt]{article}
\addtolength{\textwidth}{3.6cm}
\addtolength{\hoffset}{-1.8cm}
\addtolength{\voffset}{-1.8cm}
\addtolength{\textheight}{1.8cm}
\usepackage[pdftex, demo]{graphicx}
\usepackage[utf8x]{inputenc}
\begin{document}
    % 
    \begin{figure}[ht]
        \centering
        \includegraphics[width=0.4\textwidth]{image1.pdf}
        \caption{Caption 1, some words}
        \label{FIG:1}
    \end{figure}
    % 
    % 
    \begin{figure}[ht]
        \centering
        \includegraphics[width=0.4\textwidth]{image2.pdf}
        \caption{Caption 2, some other words}
        \label{FIG:2}
    \end{figure}
    % 
    \newpage
    %
    \par\vspace{\baselineskip}\noindent
    \par\vspace{4mm}\noindent
    {\bf{List of figures and tables}}

    \noindent
    Fig. \ref{FIG:1}. Caption 1, some words

    \noindent
    Fig. \ref{FIG:2}. Caption 2, some other words
\end{document}

有没有办法重复图表标题中写的标题（如：标题 1，一些文字）而无需重写或通过复制粘贴？

考虑一种不同的方法，是否可以简单地重写\listoffigures以获得相同的布局？

Answer 1

您可以修补 caption 命令来写出类型。但我认为期刊可能不喜欢这样的黑客行为。

\documentclass{article}
\usepackage{etoolbox}
\usepackage{tocbasic}
\usepackage[tocindentauto]{tocstyle}
\makeatletter
\patchcmd{\@caption}{
  \addcontentsline{\csname ext@#1\endcsname}{#1}%
    {\protect\numberline{\csname the#1\endcsname}{\ignorespaces #2}}%
}{
  \addcontentsline{\csname ext@#1\endcsname}{#1}%
    {\protect\numberline{#1 \csname the#1\endcsname}{\ignorespaces #2}}%
}{}{}
\newcommand{\listofcaptions}{
    {\noindent\bfseries\Large List of captions}
    \vspace{1em}
    \@starttoc{lof}
    \@starttoc{lot}
}
\makeatother
\usepackage{capt-of}
\begin{document}

\captionof{figure}{some nice caption with a duck}
\captionof{figure}{some nice caption with a cat}
\captionof{table}{some nice caption with a horse}
\captionof{table}{some nice caption with a lion}
\captionof{figure}{some nice caption with an elephant}
\noindent\rule{\textwidth}{1pt}

\listofcaptions
\end{document}

经过多次运行后，您将获得以下内容：