if (FALSE) {
library(tidyverse)
library(troopdata)
example <- get_troopdata(host = "United States",
branch = TRUE,
startyear = 1980,
endyear = 2015)
head(example)
}
Run the code above in your browser using DataLab