## Not run:
# avis_summary<- avisSpeciesSummary()
# # general overview of the data aggregated by species
# par (mfrow =c(2,2))
# hist (avis_summary$Observations, col="red", border=FALSE, main=NULL)
# hist (avis_summary$Individuals, col="red", border=FALSE, main=NULL)
# hist (avis_summary$UTM.10x10, col="red", border=FALSE, main=NULL)
# hist (avis_summary$Birdwatchers, col="red", border=FALSE, main=NULL)
# ## End(Not run)
Run the code above in your browser using DataLab