## Not run:
# #First, get a list of results
# results <- getSounds(pumilio_URL = "http://pumilio.coquipr.com/pumilio/",
# SiteID = 111, type = "site")
#
# #Then, get the file from the first row, identified with the SoundID = 4078
# getFile(results, SoundID = 4078)
# ## End(Not run)
Run the code above in your browser using DataLab