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': 20 obs. of 12 variables:
#> $ institution: chr "University of Tennessee Knoxville" "Dartmouth College" "The University of Central Florida Board of Trustees" "George Mason University" ...
#> $ pi : chr "Wang, Zhenbo" "Zhang, Xiaojing (John)" "Yao, Fan" "El-Amine, Hadi" ...
#> $ year : chr "2023" "2023" "2024" "2023" ...
#> $ start : chr "2023-04-01" "2023-09-01" "2024-03-01" "2023-01-01" ...
#> $ end : chr "2024-07-31" "2026-08-31" "2029-02-28" "2023-12-31" ...
#> $ program : chr "47.070" "47.041" "47.070" "47.041" ...
#> $ amount : chr "150000.00" "399541.00" "556875.00" "79773.00" ...
#> $ id : chr "2231710" "2318814" "2340777" "2247286" ...
#> $ title : chr "SCC-PG: Securing Underserved Communities from Drug Abuse with Drone-Based Smart Medication Delivery" "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" "Conference and Grantee's Meeting: Disrupting Operations of Illicit Supply Networks; Arlington, Virginia; 27-28 March 2023" ...
#> $ abstract : chr "Despite considerable efforts in combating substance use and exploring novel treatment and recovery strategies, "| __truncated__ "Illicit drug abuse has become another major national health crisis since the Covid-19<br/>pandemic started, due"| __truncated__ "Microarchitectural attacks (i.e., side and covert channels) have opened a new chapter in computer system securi"| __truncated__ "Networks that illegally traffic in everything from people and drugs to human organs and nuclear material pose s"| __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-02-01")
table(nsf_and_nih$source)
#> < table of extent 0 >
unique(nsf_and_nih$keyword)
#> NULLFor 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