# First, make sure your personal PVS API key is saved as character string in the pvs.key variable:
pvs.key <- "yourkey"
# get all officials of a certain state
bill <- Votes.getBill("17623", separate=c("actions", "sponsors"))
actionids <- bill$actions$actionId
# get all votes on this acti
votes <- getAllVotes(actionids, batchsize=2)
head(votes)
Run the code above in your browser using DataLab