triangle.label {adegraphics}  R Documentation 
This function represents a three dimensional scatter plot with labels.
triangle.label(dfxyz, labels = rownames(dfxyz), adjust = TRUE, min3d = NULL, max3d = NULL, addaxes = FALSE, addmean = FALSE, meanpar = NULL, axespar = NULL, showposition = TRUE, facets = NULL, plot = TRUE, storeData = TRUE, add = FALSE, pos = 1, ...)
dfxyz 
a three columns data frame used to produce the plot 
labels 
a character vector containing labels for points 
adjust 
a logical to adjust the device with the limits of the smaller equilateral triangle containing the values 
min3d 
a vector of three values for triangular minimal limits 
max3d 
a vector of three values for triangular maximal limits 
addaxes 
a logical to draw the principal axes 
addmean 
a logical to plot the mean 
meanpar 
a list to represent mean points using 
axespar 
a list to represent axes lines using 
showposition 
a logical indicating whether the used triangle should be shown in the complete one 
facets 
a factor splitting the rows of 
plot 
a logical indicating if the graphics is displayed 
storeData 
a logical indicating if the data are stored in
the returned object. If 
add 
a logical. If 
pos 
an integer indicating the position of the
environment where the data are stored, relative to the environment
where the function is called. Useful only if 
... 
additional graphical parameters (see

An object of class ADEg
(subclass Tr.label
) or ADEgS
(if showposition
is TRUE,
if add
is TRUE
and/or if facets are used).
The result is displayed if plot
is TRUE
.
Alice JulienLaferriere, Aurelie Siberchicot aurelie.siberchicot@univlyon1.fr and Stephane Dray
data(euro123, package = "ade4") df < rbind.data.frame(euro123$in78, euro123$in86, euro123$in97) row.names(df) < paste(row.names(euro123$in78), rep(c(1, 2, 3), rep(12, 3)), sep = "") g1 < triangle.label(df, label = row.names(df), showposition = TRUE, plot = FALSE) g2 < triangle.label(euro123$in78, plabels.cex = 0, ppoints.cex = 2, addmean = TRUE, show = FALSE, plot = FALSE) g3 < triangle.label(euro123$in86, labels = row.names(euro123$in78), plabels.cex = 0.8, plot = FALSE) g4 < triangle.label(rbind.data.frame(euro123$in78, euro123$in86), plabels.cex = 0.8, addaxes = TRUE, psub.te = "Principal axis", psub.cex = 1.5, psub.pos = "topright", plot = FALSE) G < ADEgS(c(g1, g2, g3, g4), layout = c(2, 2))