# First, make sure your personal PVS API key is saved as character string in the pvs.key variable:
pvs.key <- "yourkey"
# get information about certain bills
billinfo <- Votes.getBill(list(2819,6427))
billinfo
# let some variables with subnodes be returned separately (here: "sponsors" and "actions")
billinfo2 <- Votes.getBill(billId=list(2819,6427,6590),
separate=c("sponsors","actions"))
billinfo2
# check the sponsors of the requested bill (argument of separate)...
billinfo2$sponsors
# ... and the usual variables describing the bill (nodes not mentioned in separate)
billinfo2$main
Run the code above in your browser using DataLab