rysgran.ternary: Generates the Ternary Diagrams of Shepard, Pejrup and...
In rysgran: Grain size analysis, textural classifications and distribution of unconsolidated sediments

Description Usage Arguments Details Value Note Author(s) References See Also Examples

Uses data from percentages of soil textures to generate ternary diagrams of Shepard (Shepard, 1954), Pejrup (Pejrup, 1988) and Flemming (Flemming, 2000)

rysgran.ternary(x = NULL, method = "shepard", lang = "en-US", 
    main= NULL, z= NULL, show.labels=FALSE, label.points=FALSE,
    labels = NULL, axis.labels = NULL, show.names = TRUE,
    show.lines = TRUE, show.legend = TRUE, show.grid = FALSE,
    z.cex.range= NULL, cex.labels= 1, cex.points=1, cex.axis=1,
    cex.names = 0.8, col.names = "gray2", col = "black",
    col.labels= "black", col.axis= "black", col.lines= "black",
    col.grid = "gray", pos = 1, pch = 19, lty.grid = 3, ...)

`x`	a 3 columns matrix with percentages of Sand, Silt and Clay (exactly in this order) which should be passed by `class.percent` function. The sum of each row must be 100 or 1, otherwise there may be distortions in the position of the points
`method`	shape of ternary diagram to be created. Should be "shepard", "pejrup" or "flemming". Default is "shepard"
`lang`	language . Should be English ("en-US", "en-GR", "eng", "e"), or Portuguese ("pt-BR", "pt-PT", "port", "p"). The default is "en-US"
`main`	an overall title for the plot. If NULL it will be generated an automatic title according to language chosen. Default is NULL
`z`	vector with the same length of `x` and `y` whose value must be used to define the points expansion factor and color (bubble plot). If NULL, a simple plot is drawn (no 'bubbles'). Default is "NULL"
`show.labels`	logical. If TRUE the points are replaced by text passed by `labels` argument. Default is FALSE
`label.points`	logical. if TRUE text is added, provided by the argument `labels`, with the points on the graph. the text position to the point should be changed by argument `pos`. `labels.points` will be automatically FALSE if `show.labels` is TRUE. The default is FALSE
`labels`	a character vector or expression specifying the text to be written. If NULL `labels` will be the row names of the `data` argument. Default is NULL
`axis.labels`	vector of length 3 with the soil textures names. If NULL the names are taken from the matrix of percentages. Default is NULL
`show.names`	logical. If TRUE the textural classes names will show up in the ternary diagram according with the `method` argument. Should be used with the argument `show.legend`. Default is TRUE
`show.lines`	logical. If TRUE the lines that separate the textural classes are displayed. Default is TRUE
`show.legend`	logical. If TRUE the legend of textural classes are displayed in the top left according with the argument `method`. Should be used with the argument `show.names`. Default is TRUE
`show.grid`	logical. If TRUE display grid lines in the ternary diagram. Default is FALSE
`z.cex.range`	Vector of length 2. Minimum and maximum 'cex' of the bubbles plotted if 'z' is not NULL. Replace the argument `cex.points`. Default is "(1,3)"
`cex.labels`	character size of text provided by the argument `labels` added with the point (or replacing it) in case `show.label`, `label.points` or `z` arguments are defined. Default is "1"
`cex.points`	character size of points provided by the argument `pch`. Default is "1"
`cex.axis`	character expansion for axis labels. Default is "1"
`cex.names`	character size of text of textural classes text which composes the ternary diagram according to `method` argument. Default is "1"
`col.names`	text color of textural classes which composes the ternary diagram if the argument `show.names` is TRUE. Default is "gray"
`col`	symbol color used in `pch` argument if the argument `show.labels` is FALSE. Default is "black"
`col.labels`	text color of `labels` if the arguments `show.label`, `label.points` or `z` are defined. Default is "black"
`col.axis`	text color of axis labels. Default is "black"
`col.lines`	color of lines that separate the textural classes case the argument `show.lines` is TRUE. Default is "black"
`col.grid`	color of grid lines case the argument `show.grid` is TRUE. Default is "gray"
`pos`	a position specifier for the text. Values of 1, 2, 3 and 4, respectively, indicate positions below, to the left of, above and to the right of the specified coordinates. Default is "1"
`pch`	either an integer specifying a symbol or a single character to be used as the default in plotting points. Default is "19"
`lty.grid`	type of grid line case the argument `show.grid` is TRUE. Default is "3"
`...`	further graphical parameters

When z argument is used to draw bubble plots the legend.bubbles function should be used to draw the legend accordingly

Display a triangular plot

rysgran.ternary can only properly display one or more sets of three proportions (sand, silt and clay) that each sum to 1 (or percentages that sum to 100), otherwise they will not plot properly and the user will be notified. Samples with considerable amount of gravel are not properly plotted. rysgran.ternary is based on plotrix package and depends on soiltexture package

Eliandro R. Gilbert (eliandrogilbert@gmail.com)

- Flemming, B. W. (2000) A revised textural classification of gravel-free muddy sediments on the basis of ternary diagrams. Continental Shelf Research, 20:1125–1137.

- Pejrup, M. (1988) The triangular diagram used for classification of estuarine sediments: a new approach. in: Tide-influenced sedimentary environments and facies. BOER, P.L. ; GELDER, A. & NIO, S.D. (Eds). D. Reidel Publishing Company. Holland.

- Shepard, F. P. (1954) Nomenclature based on sand-silt-clay ratios. Journal Sedimentary Petrology, 24:151–158.

gran.stats , class.percent , rysgran.ternary , rysgran.hist, legend.bubbles

library(rysgran)
data(camargo2001)
data(sed.phi)

#Shepard diagram
percent <- class.percent(camargo2001, mode="total")
x<-percent[2:4] #choosing only the 'sand', 'silt' and 'clay' columns
rysgran.ternary  (x, method = "shepard")


#Pejrup diagram
percent <- class.percent(camargo2001, mode="total")
x<-percent[2:4] #choosing only the 'sand', 'silt' and 'clay' columns
rysgran.ternary  (x, method = "pejrup")

#Flemming diagram
percent <- class.percent(camargo2001, mode="total")
x<-percent[2:4] #choosing only the 'sand', 'silt' and 'clay' columns
rysgran.ternary  (x, method = "flemming")

#Shepard diagram with show.labels
percent <- class.percent(camargo2001, mode="total")
x<-percent[2:4]
rysgran.ternary (x, method="shepard", show.labels = TRUE)


#Pejrup diagram with Sorting as bubbles for different environments
#Calculating the percentage of weight in each textural class
percent <- class.percent(sed.phi, mode="total")
x<-percent[2:4]

# Calculating the grain size statistics
rys <- gran.stats(sed.phi , method="folk")
env<- as.factor(rep(c("River","Tidal Flat","Subtidal","Beach"),each=10))

# Plotting
rysgran.ternary (x, method = "pejrup",
	z = rys$Sorting, z.cex.range = c(0.5,3), 
	col = c("red","blue","black","brown")[env], pch = 19)

# Plotting the legends
legend.bubbles ("right", z=rys$Sorting , nleg=4, pch=21, col="black",
	cex=1, z.cex.range=c(0.5,3), x.intersp=1.2, y.intersp=1.2,
	digits=1, title="Sorting")

legend ("topright", c("Beach","River","Subtidal","Tidal Flat"),
	pch=15, col=c("red","blue","black","brown"))