paltran-package {paltran} | R Documentation |
This package contains functions for paleolimnology - WA-regression (see also package analogue!), WA-PLS and MW regression. The function palplot allows a first plot of the data including a trend analysis. Additional a transfer function based on proportional odds (POM) is added, but this function is just a first test version based on class data.
Package: | paltran |
Type: | Package |
Version: | 1.2-0 |
Date: | 2009-03-06 |
License: | GPL (>= 2) |
LazyLoad: | yes |
Sven Adler <sven.adler2@uni-rostock.de>
ter Braak, C.J.F. & van Dam, H. 1989. Inferring pH from diatoms: a comparison of old and new calibration methods. Hydrobiologia 178:209-23. ter Braak, C.J.F. & Juggins, S. 1993. Weighted averaging partial least squares regression WA-PLS: an improved method for reconstructing environmental variables from species assemblages. Hydrobiologia 269:485-502. Huebener, T., Dressler,M., Schwarz,A.,Langner, K., Adler,S. 2008. Dynamic adjustment of training sets (`moving windows` reconstruction) by using transfer functions in paleolimnology -a new approache, J. o. Paleolimnology 40, 79-95
package analogue by G. Simpson and J. Oksanen
data(age.dud) data(dud.df) data(train_set.MV) data(train_env.MV) try<-wa(train_set.MV,train_env.MV,dud.df,val="boot",run=10) # run should be set higher 100-1000 spec<-c(23,24,217,218,223,228) c<-c(rep(4,6),2,3) t<-c(rep("h",6),"l","p") x<-c(rep("abundance",6),"n","mug/l") tr<-c(rep(0,7),1) palplot(dud.df[,spec],try[[12]],10^try[[13]],trend=tr, cex.axis=0.8,p.col=c,ptype=t,p.main=c(names(dud.df[,spec]), "N2","inf. log(TP)"),dis=0.2,p.xlab=x,age=age.dud[,1]) palplot(try[[14]],ptype="l",error=1.96*try[[15]], error.ptype="p",error.plot=TRUE,p.col="blue",age=age.dud[,1])