search_awards is meant to be the top-level function for
interacting with grant database search functions.
Simple keyword search, single source
nsf <- search_awards(keywords="illicit", sources="nsf", from_date="2023-01-01")
str(nsf)
#> 'data.frame': 36 obs. of 12 variables:
#> $ institution: chr "SUNY at Albany" "University of Notre Dame" "Dartmouth College" "The University of Central Florida Board of Trustees" ...
#> $ pi : chr "Prabhakaran, Balakrishnan" "Nichols, Lisa" "Zhang, Xiaojing" "Yao, Fan" ...
#> $ year : chr "2026" "2026" "2023" "2024" ...
#> $ start : chr "2026-10-01" "2026-07-15" "2023-09-01" "2024-03-01" ...
#> $ end : chr "2028-09-30" "2029-06-30" "2027-08-31" "2029-02-28" ...
#> $ program : chr "47.041" "47.070, 47.083" "47.041" "47.070" ...
#> $ amount : chr "400000" "1200000" "399541" "556875" ...
#> $ id : chr "2629882" "2613803" "2318814" "2340777" ...
#> $ title : chr "EAGER: Exploring Robot-K9 Teaming through Canine Cognitive Modeling and Multimodal Communication" "CICI:TCR: Demonstrating NSPM-33 Cybersecurity Critical Controls Transition at Research Institutions Through Acc"| __truncated__ "Label-free Detection of Opioids in Liquid Using Zinc Oxide Nanophotonic Sensor" "CAREER: Understanding and Ensuring Secure-by-design Microarchitecture in Modern Era of Computing" ...
#> $ abstract : chr "Canines and humans team together in a variety of situations, with dogs providing assistance and companionship t"| __truncated__ "Foreign adversaries continue campaigns to seek scientific and technological advantage through both legitimate a"| __truncated__ "Illicit drug abuse has become another major national health crisis since the Covid-19\r\npandemic started, due "| __truncated__ "Microarchitectural attacks (i.e., side and covert channels) have opened a new chapter in computer system securi"| __truncated__ ...
#> $ keyword : chr "illicit" "illicit" "illicit" "illicit" ...
#> $ source : chr "NSF" "NSF" "NSF" "NSF" ...Multiple sources and keywords, specific date range
nsf_and_nih <- search_awards(keywords=c("ontological", "audio recordings"), sources=c("nsf", "nih"), from_date="2018-01-01", to_date="2018-09-01")
table(nsf_and_nih$source)
#>
#> NIH NSF
#> 21 11
unique(nsf_and_nih$keyword)
#> [1] "ontological" "audio recordings"For more than a few keywords, you can specify an external simple csv
file. If you specify a .csv file path for keywords, the
file should be a list of keywords, one string per line. For example:
qualitative data
qualitative analysis
case study
case studies