# #not run
# require(paleofire)
# ID=pfSiteSel(c(1:10))
# obj=potveg(ID,classif="l12")
# plot(obj)
#
# #Return a ggplot object
# require(ggplot2)
# p=plot(obj,text=TRUE,alpha=1)
# p+ggtitle("My title")
Run the code above in your browser using DataLab