Skip to contents

The functions generates the funding information section of the manuscript. The output is generated from an contributors_table based on the contributors_table_template().

Usage

print_funding(contributors_table, initials = FALSE)

Arguments

contributors_table

validated contributors_table

initials

Logical. If true initials will be included instead of full names in the output

Value

The function returns a string.

See also

Examples

example_contributors_table <- read_contributors_table(
contributors_table = system.file("extdata",
"contributors_table_example.csv", package = "tenzing", mustWork = TRUE))
#> Rows: 3 Columns: 26
#> ── Column specification ────────────────────────────────────────────────────────
#> Delimiter: ","
#> chr  (9): Firstname, Middle name, Surname, Affiliation 1, Affiliation 2, Aff...
#> dbl  (1): Order in publication
#> lgl (16): Conceptualization, Data curation, Formal analysis, Funding acquisi...
#> 
#>  Use `spec()` to retrieve the full column specification for this data.
#>  Specify the column types or set `show_col_types = FALSE` to quiet this message.
print_funding(contributors_table = example_contributors_table, initials = FALSE)
#> [1] "John M. Smith and Lex W. Luthor were supported by Important Fund; Marton Kovacs was supported by National Funding Agency."