Identify the open-access status and reuse license from a TXT file.

The plain-text counterpart of [rt_oa_pmc()]. It detects an open-access declaration and a Creative Commons license from the article text (for example a "This is an open access article distributed under the terms of the Creative Commons Attribution License" statement). Plain text lacks the structured JATS `<license>` element, so detection relies on the prose and any license URL it contains.

Usage

rt_oa(filename = NULL, text = NULL)

Arguments

filename

The path to a TXT file as a string.

text

Alternatively, the article text itself as a character vector (for example the output of [rt_read_pdf()]). Supply `filename` or `text`.

Value

A tibble with the file name (`article`), the PMID (`NA` if absent), whether the article is openly licensed (`is_open_access`), the canonical license (`oa_license`) and the license statement (`oa_text`).

See also

[rt_oa_pmc()] for the PMC XML detector.

Examples

# \donttest{
# Write a short example article to a temporary text file.
filepath <- file.path(tempdir(), "PMID00000000-PMC0000000.txt")
writeLines(
  paste(
    "This is an open access article distributed under the terms of the",
    "Creative Commons Attribution License (CC BY 4.0)."
  ),
  filepath
)
rt_oa(filepath)
#> # A tibble: 1 × 5
#>   article                     pmid     is_open_access oa_license oa_text        
#>   <chr>                       <chr>    <lgl>          <chr>      <chr>          
#> 1 PMID00000000-PMC0000000.txt 00000000 TRUE           CC-BY-4.0  This is an ope…
# }