# First, make sure your personal PVS API key is saved as character string in the pvs.key variable:
pvs.key <- "yourkey"
# get leaders by state ID and leadership ID
officials <- Leadership.getOfficials(list("NY","FL"),list(138,140))
officials
Run the code above in your browser using DataLab