|
1 | | -bibentry(bibtype="Article", |
2 | | - header="To cite 'igraph' in publications use:", |
3 | | - title="The igraph software package for complex network research", |
4 | | - author=c(as.person("Gabor Csardi"), as.person("Tamas Nepusz")), |
5 | | - journal="InterJournal", |
6 | | - volume="Complex Systems", |
7 | | - pages="1695", |
8 | | - year=2006, |
9 | | - url="https://igraph.org") |
| 1 | +citHeader("To cite igraph please use these three references.") |
| 2 | + |
| 3 | +bibentry( |
| 4 | + bibtype = "Article", |
| 5 | + title = "The igraph software package for complex network research", |
| 6 | + author = c(as.person("Gábor Csárdi"), as.person("Tamás Nepusz")), |
| 7 | + journal = "InterJournal", |
| 8 | + volume = "Complex Systems", |
| 9 | + pages = "1695", |
| 10 | + year = 2006, |
| 11 | + url = "https://igraph.org" |
| 12 | +) |
| 13 | + |
| 14 | +bibentry( |
| 15 | + bibtype = "Article", |
| 16 | + title = "igraph enables fast and robust network analysis across programming languages", |
| 17 | + author = c(as.person("Michael Antonov"), as.person("Gábor Csárdi"), as.person("Szabolcs Horvát"), as.person("Kirill Müller"), as.person("Tamás Nepusz"), as.person("Daniel Noom"), as.person("Maëlle Salmon"), as.person("Vincent Traag"), as.person("Brooke Foucault Welles"), as.person("Fabio Zanini")), |
| 18 | + journal = "arXiv preprint arXiv:2311.10260", |
| 19 | + year = 2023, |
| 20 | + doi = "10.48550/arXiv.2311.10260" |
| 21 | +) |
10 | 22 |
|
11 | 23 | note <- sprintf("R package version %s", meta$Version) |
12 | 24 | # https://github.com/cran/lidR/blob/f0dae39007c9d174f6e1962ff236fd8826f1501d/inst/CITATION#L21 |
13 | 25 | year <- format(Sys.Date(), "%Y") |
14 | 26 | authors <- meta$`Authors@R` |
15 | 27 | authors <- utils:::.read_authors_at_R_field(authors) |
16 | | -authors <- Filter(function(e) { |
17 | | - !(is.null(e$given) && is.null(e$family)) && !is.na(match("aut", e$role)) |
18 | | -}, authors) |
| 28 | +authors <- Filter( |
| 29 | + function(e) { |
| 30 | + !(is.null(e$given) && is.null(e$family)) && !is.na(match("aut", e$role)) |
| 31 | + }, |
| 32 | + authors |
| 33 | +) |
19 | 34 | authors <- format(authors, include = c("given", "family")) |
20 | 35 |
|
21 | 36 | # Step 1: Get text citation and replace there the abb. |
22 | | -entry_for_txt <- format(bibentry( |
23 | | - bibtype = "Manual", |
24 | | - title = "{igraph}: Network Analysis and Visualization in R", |
25 | | - author = authors, |
26 | | - year = year, |
27 | | - note = note, |
28 | | - doi = "10.5281/zenodo.7682609", |
29 | | - url = "https://CRAN.R-project.org/package=igraph" |
30 | | -), style = "text") |
| 37 | +entry_for_txt <- format( |
| 38 | + bibentry( |
| 39 | + bibtype = "Manual", |
| 40 | + title = "{igraph}: Network Analysis and Visualization in R", |
| 41 | + author = authors, |
| 42 | + year = year, |
| 43 | + note = note, |
| 44 | + doi = "10.5281/zenodo.7682609", |
| 45 | + url = "https://CRAN.R-project.org/package=igraph" |
| 46 | + ), |
| 47 | + style = "text" |
| 48 | +) |
31 | 49 |
|
32 | 50 | txt <- gsub("Horvát S", "Horvát Sz", entry_for_txt) |
33 | 51 |
|
|
0 commit comments