using RCall
population = rcopy("neiss::population");
products = rcopy("neiss::products");
injuries = rcopy("neiss::injuries");
size(injuries)

dump(injuries)  # sort of like R's str function but not as polished

names(injuries)

@rimport neiss

whos(neiss)    # reads like Santa Claus deciding who's naughty and ..