☰

Citação direta com a primeira letra do autor em maiúscula

tag-icon • tag-icon citing natbib
Citação direta com a primeira letra do autor em maiúscula

Estou tentando fazer uma citação direta no meu texto, onde preciso que apenas a primeira letra do nome do autor esteja em maiúscula.

Por alguma razão, natbib's\Citet(com C maiúsculo) não coloca a primeira letra da citação no texto em maiúscula, portanto \citet e \Citet têm exatamente a mesma saída:

Cenário atual

\citet[p. 32]{Christensen1997} --> CHRISTENSEN (1997, p. 32)    
\Citet[p. 32]{Christensen1997} --> CHRISTENSEN (2013, p. 32)

Resultado pretendido

\Citet[p.32]{Christensen1997} --> Christensen (1997, p. 32)

Observe que isso também deve ser verdade quando não adiciono o número da página:

\Citet{Christensen1997} --> Christensen (1997)

Aqui está a entrada no meu arquivo .bib

@book{Christensen1997,
address = {Boston},
author = {Christensen, Clayton M},
booktitle = {The management of innovation and change series},
publisher = {Harvard Business School Press},
title = {{The Innovator's Dilemma: When New Technologies Cause Great Firms to Fail}},
year = {1997}
}

O estilo de bibliografia que estou usando é ABNT (link)

Por favor, deixe-me saber se você precisar de mais informações. Obrigado!

Responder1

Você pode alterar a linha 383 do abnt.bst, dentro da função format.family.names, de

        "u" change.case$

para

        "t" change.case$

Isto alterará a string usada nos comandos de citação, mas não afetará a impressão na bibliografia. O "u" deixou o asterisco maiúsculo; "t" tornará o título em maiúsculas.

Exemplo de saída

\documentclass{article}

\usepackage{natbib}
\bibliographystyle{abnt}

\begin{document}

\citet{Christensen1997}

\Citet{Christensen1997}

\bibliography{\jobname.bib}

\end{document}

Se você usar o \citeauthor*comando, deverá fazer uma alteração semelhante na função format.family.names.all.

Dependendo dos seus requisitos reais, você pode preferir deixar a string em minúsculas usando "l"em vez de "t". Em seguida, \citetfornecerá o nome em letras minúsculas e \Citetterá a primeira letra maiúscula.

Responder2

Existem alguns comandos de formatação de nome nas linhas 319-419

%==============================================================================
% Formata uma lista de nomes.
%
% Parm:
%    os nomes a serem formatados
%==============================================================================
FUNCTION {format.names}
{
    duplicate$ num.names$ 'n :=
    #1 'i :=
    "" 'names :=

    {i n #1 + <}
    {
        duplicate$ duplicate$ i "{ll}{~jj}" format.name$
        duplicate$ "others" =
        n #3 >
        i #2 =
        and
        or
        {
            pop$ pop$ names " et~al." *
            n 'i :=
        }{
            "u" change.case$ swap$
            i "{, f.}{~vv}" format.name$ *
            names swap$ add.to.namelist
        } if$ 'names :=
        #1 i + 'i :=
    } while$
    pop$
    names
    duplicate$ #-1 #1 substring$ "." = {
        #-2 global.max$ substring$
        "\@." *
    }
        'skip$
    if$
}

%==============================================================================
% Formata uma lista de sobrenomes.
%
% Parm:
%    os nomes a serem formatados
%==============================================================================
FUNCTION {format.family.names}
{
    duplicate$ num.names$ 'n :=
    #1 'i :=
    "" 'names :=

    {i n #1 + <}
    {
        duplicate$ i "{ll}{~jj}" format.name$
        duplicate$ "others" =
        n #3 >
        i #2 =
        and
        or
        {
            pop$ names " et~al." *
            n 'i :=
        }{
            "u" change.case$
            names swap$ add.to.namelist
        } if$ 'names :=
        #1 i + 'i :=
    } while$
    pop$
    names
}

%==============================================================================
% Formata uma lista de sobrenomes com todos os autores.
%
% Parm:
%    os nomes a serem formatados
%==============================================================================
FUNCTION {format.family.names.all}
{
    duplicate$ num.names$ 'n :=
    #1 'i :=
    "" 'names :=

    {i n #1 + <}
    {
        duplicate$ i "{ll}{~jj}" format.name$
        duplicate$ "others" =
        {
            pop$ names " et~al." *
            n 'i :=
        }{
            "u" change.case$
            names swap$ add.to.namelist
        } if$ 'names :=
        #1 i + 'i :=
    } while$
    pop$
    names
}

Eu realmente não conheço a linguagem .bst, mas acho que apenas remover os change.case$comandos pode resolver o seu problema.

informação relacionada