## Not run:  
#  dt1 <- getOccurrences(tvks="NBNSYS0000002987", datasets="GA000373", 
#                        startYear="1990", endYear="1991")
#                       
#  dt2 <- getOccurrences(tvks=c("NBNSYS0000002987","NHMSYS0001688296","NHMSYS0000080210"),
#                        startYear="1990", endYear="1991")
#                        
#  dt3 <- getOccurrences(group="quillwort", startYear="1990", endYear="2010",
#                        VC="Shetland (Zetland)")
#  
#  # Get the data providers information
#  dp <- attr(dt1,'providers')                      
#                        
# ## End(Not run)
Run the code above in your browser using DataLab