☰

使用完全扩展的结果作为简单字符串（使用 citet 和 \IfSubStr）

tag-icon • tag-icon macros natbib expansion strings
使用完全扩展的结果作为简单字符串（使用 citet 和 \IfSubStr）

我为这个问题伤透了脑筋，却在互联网上找不到任何能帮我解决的东西：

最初的问题是我用法语写了一篇文章，但我需要包含一些用英语写的文章，因此引用风格不同。由于法语是主要语言，我使用包unsrtnat-fr中的书目样式natbib，它会产生“Name1等Name2”（两位作者）使用\citet。我想恢复给定英文部分的正常样式“Name1和名称”。我的解决方案是定义一个自定义命令，比如说\encitet，它替换“等”经过“ 和 ”在的结果中\citet。

我尝试了不同的定义，但最终我不明白该怎么做......每次都有参数扩展的问题。

下面是我想要定义的命令的伪代码：

\newcommand{\encitet}[1]{%
% 1 : store the result of \citet{#1} in tmp (as a simple string)
% 2 : test if 'et al.' is found into the string
% 3 : if found then return tmp 
% 4 : else return the replacement of every " et " by " and " in tmp
}

下面是我用于测试的 TeX 文件：

\documentclass{article}
\usepackage[utf8]{inputenc}
\usepackage[english]{babel}
\usepackage{trace}
\usepackage{xspace}
\usepackage{xstring}
\usepackage{etoolbox}
\usepackage{stringstrings}
\usepackage[square,numbers]{natbib}
\bibliographystyle{abbrvnat-fr}

% Here is the problem
\newcommand{\encitet}[1]{%
    \def\tmp{\expandafter\citet{#1}}%
    %\edef\tmp\expandafter{\mytemp{#1}}%
    %
    \expandafter\IfSubStr{\tmp}{et al.}{%
        \tmp%
    }{%
        \StrSubstitute{\tmp}{ et }{ and }%
    }\xspace%
}

% Example that works
\newcommand{\encitett}[1]{%
    \def\mytemp{\expandafter\citet{#1}}%
    \expandafter\ifstrequal\mytemp{#1}{a}{"a" was given}{not a}, %
    \expandafter\ifstrequal\mytemp{#1}{b}{"b" was given}{not b}%
}


\begin{document}

% Example with two authors
\encitet{einstein}

% Example with more than two authors 
\encitet{latexcompanion}


\citep{knuthwebsite}


\medskip

\bibliography{sample}

\end{document}

和 bib 文件：

@article{einstein,
    author =       "Albert Einstein and AnotherGuy ForTheTest",
    title =        "{Zur Elektrodynamik bewegter K{\"o}rper}. ({German})
        [{On} the electrodynamics of moving bodies]",
    journal =      "Annalen der Physik",
    volume =       "322",
    number =       "10",
    pages =        "891--921",
    year =         "1905",
    DOI =          "http://dx.doi.org/10.1002/andp.19053221004"
}

@book{latexcompanion,
    author    = "Michel Goossens and Frank Mittelbach and Alexander Samarin",
    title     = "The \LaTeX\ Companion",
    year      = "1993",
    publisher = "Addison-Wesley",
    address   = "Reading, Massachusetts"
}

@misc{knuthwebsite,
    author    = "Donald Knuth",
    title     = "Knuth: Computers and Typesetting",
    url       = "http://www-cs-faculty.stanford.edu/\~{}uno/abcde.html"
}

编译命令：

pdflatex test.tex && pdflatex test.tex && bibtex test && pdflatex test.tex && pdflatex test.tex

我提前感谢你的帮助

答案1

这行不通。\citet 是一个过于复杂的宏，您无法通过简单的方式检索其输出。如果您真的想坚持使用 natbib（biblatex 语言支持内置），您应该操作 .bst 文件。将其保存在文档文件夹中的另一个名称下，然后更改固定单词，以便它们发出命令。例如

FUNCTION{fr.and}{       %% le "et" entre les deux derniers auteurs
" \authorand{} "
}

然后您可以在文档中为命令提供合理的定义。

相关内容