powered by
get.triprop
get.triprop(use.percentages=FALSE,cnames=c("1st","2nd","3rd"))
triax.plot
soil.texture
if(dev.interactive()) { # get some proportions newsp<-get.triprop() # show the triangle triax.frame(main="Test triax.plot") # now plot the observations triax.points(newsp) }
Run the code above in your browser using DataLab