# First, make sure your personal PVS API key is saved as character string in the pvs.key variable:
pvs.key <- "yourkey"
# get leadership positions by state ID and office ID
positions <- Leadership.getPositions(list("AL","FL"),8)
positions
Run the code above in your browser using DataLab