# NOT RUN {
## Composite charcoal record for Western Boreal North America:
ID=pfSiteSel(continent=="North America", long<(-100) & l12==1)
plot(ID)
## Transform data
res3=pfTransform(ID,method=c("MinMax","Box-Cox","Z-Score"),BasePeriod=c(200,4000))
## Composite
comp=pfComposite(res3,bins=seq(from=-500,to=12500,by=1000))
plot(comp)
## Kruskal Wallis Anova
comparison=pfKruskal(comp)
plot(comparison)
# p=plot(comparison)
# require(ggplot2)
# p+ggtitle("my title")
# }
Run the code above in your browser using DataLab