Displaying 1 result from an estimated 1 matches for "percurr".
Did you mean:
percur
2008 May 01
2
using the sink() function in a for-look
...g(file=paste(taxa.i,".multiple.regress.residuals.1.RAW.jpeg",sep=""),
quality=90, width=1000, height=1000)
> par(mfrow=c(2,2), lwd=0.5, mar=c(3,4,3,1), bty="o", oma=c(0,3,2,0))
> attach(data.x)
> mult.reg.raw.i <- lm(data.y[,i] ~ CURRENT + LITTER + PERCURR + SUBST)
> plot(mult.reg.raw.i, ask=FALSE)
> mtext(names(data.y[i]), side=3, line=-1.5, adj=0.48, cex=0.75,
outer=TRUE)
> dev.off()
> sink("mulptiple regression - summary RAW.txt", append=TRUE)
> summary(mult.reg.raw.i)
> sink()
> }
cheers,
ton...