Presented by Sahar Alhassan, Kaitlyn Lynes,
Deepa Mehta, & Ilya Perepelitsa
December 14, 2015
Presented by Sahar Alhassan, Kaitlyn Lynes,
Deepa Mehta, & Ilya Perepelitsa
December 14, 2015
load("NSF.RData")
library(ggplot2)
newdata <- schoolsall[which(schoolsall$starting_date < '2015-01-01' & schoolsall$starting_date > '2014-01-01'), ]
newdata1 <- schoolsall[which(schoolsall$starting_date < '2015-01-01' & schoolsall$starting_date > '2013-01-01'), ]
newdata2 <- schoolsall[which(schoolsall$starting_date < '2015-01-01' & schoolsall$starting_date > '2012-01-01'), ]
newdata3 <- schoolsall[which(schoolsall$starting_date < '2015-01-01' & schoolsall$starting_date > '2008-01-01'), ]
newdata4 <- schoolsall[which(schoolsall$starting_date < '2015-01-01' & schoolsall$starting_date > '1999-01-01'), ]
newdata5 <- schoolsall[which(schoolsall$starting_date < '2015-01-01' & schoolsall$starting_date > '1999-01-01'), ]
H1: Less expensive grants are more likely to be granted at the beginning of the year, while more expensive grants are more likely to be granted at the end of the year. This reflects difficulty.
H2: Pressure to spend end of fiscal year Congress Appropriations results in increased demand for grants. NSF more likely to choose expensive grants to appropriate money more quickly.
*Appears to be uniform, although some variation in Small Business recipients