Last chance! 50% off unlimited learning
Sale ends in
# NOT RUN {
data(nztrees)
Q <- quadscheme(nztrees)
plot(Q, main="NZ trees: quadrature scheme")
oldpar <- par(mfrow=c(2,1))
plot(Q, main="NZ trees", dum=list(add=FALSE))
par(oldpar)
# }
Run the code above in your browser using DataLab