R cite 引用参考书目条目

说明

在文本中引用bibentry 对象。 cite() 函数使用默认 bibstyle 中的 cite() 函数(如果存在)或 citeNatbib()(如果不存在)。 citeNatbib() 使用与 LaTeX 包 natbib 类似的样式。

用法

cite(keys, bib, ...)
citeNatbib(keys, bib, textual = FALSE, before = NULL, after = NULL,
           mode = c("authoryear", "numbers", "super"),
           abbreviate = TRUE, longnamesfirst = TRUE,
           bibpunct = c("(", ")", ";", "a", "", ","), previous)

参数

keys	要引用的条目键的字符向量。单个条目中可能包含多个键，并用逗号分隔。
bib	一个 "bibentry" 对象，包含要在其中查找键的文档列表。
...	要传递给默认样式的 cite() 函数的其他参数。
textual	产生“textual”风格的引文，即什么‘⁠\citet⁠' 将在 LaTeX 中生成。
before	在引文之前显示的可选文本。
after	引文后显示的可选文本。
mode	引用的“mode”。
abbreviate	是否缩写长作者列表。
longnamesfirst	如果是 abbreviate == TRUE ，是否保留第一个引用很长。
bibpunct	引文中使用的标点符号向量，如 natbib 中使用的。请参阅详细信息部分。
previous	先前引用的键列表，在 abbreviate == TRUE 和 longnamesfirst == TRUE 时使用

细节

参数名称是根据 LaTeX natbib 包的文档选择的。请参阅该文档了解 bibpunct 条目的解释。

bibpunct中的条目如下：

1. 左分隔符。

2. 正确的分隔符。

3. 引文中参考文献之间的分隔符。

4. “mode” 的指示符："n" 表示数字，"s" 表示上标，author-year 表示其他任何内容。

5. 作者和年份之间的标点符号。

6. 当作者身份被压制时，年份之间的标点符号。

请注意，如果指定了 mode，它将覆盖 bibpunct[4] 中的模式规范。部分匹配用于 mode 。

citeNatbib 的默认值已选择为匹配 JSS 样式，并且默认情况下这些值用于 cite 中。请参阅bibstyle 了解如何设置不同的默认样式。

值

返回单个元素字符串，其中包含引文。

例子

## R reference
rref <- bibentry(
   bibtype = "Manual",
   title = "R: A Language and Environment for Statistical Computing",
   author = person("R Core Team"),
   organization = "R Foundation for Statistical Computing",
   address = "Vienna, Austria",
   year = 2013,
   url = "https://www.R-project.org/",
   key = "R")

## References for boot package and associated book
bref <- c(
   bibentry(
     bibtype = "Manual",
     title = "boot: Bootstrap R (S-PLUS) Functions",
     author = c(
       person("Angelo", "Canty", role = "aut",
         comment = "S original"),
       person(c("Brian", "D."), "Ripley", role = c("aut", "trl", "cre"),
         comment = "R port, author of parallel support",
         email = "ripley@stats.ox.ac.uk")
     ),
     year = "2012",
     note = "R package version 1.3-4",
     url = "https://CRAN.R-project.org/package=boot",
     key = "boot-package"
   ),

   bibentry(
     bibtype = "Book",
     title = "Bootstrap Methods and Their Applications",
     author = as.person("Anthony C. Davison [aut], David V. Hinkley [aut]"),
     year = "1997",
     publisher = "Cambridge University Press",
     address = "Cambridge",
     isbn = "0-521-57391-2",
     url = "http://statwww.epfl.ch/davison/BMA/",
     key = "boot-book"
   )
)

## Combine and cite
refs <- c(rref, bref)
cite("R, boot-package", refs)

## Cite numerically
savestyle <- tools::getBibstyle()
tools::bibstyle("JSSnumbered", .init = TRUE,
         fmtPrefix = function(paper) paste0("[", paper$.index, "]"),
         cite = function(key, bib, ...)
         	citeNatbib(key, bib, mode = "numbers",
         	    bibpunct = c("[", "]", ";", "n", "", ","), ...)
         )
cite("R, boot-package", refs, textual = TRUE)
refs

## restore the old style
tools::bibstyle(savestyle, .default = TRUE)

作者

Duncan Murdoch