R: Ternary diagrams

simplemissingplot {compositions} | R Documentation

## Ternary diagrams

### Description

Displaying compositions in ternary diagrams

### Usage

    simpleMissingSubplot(loc, portions, labels=NULL,
              col=c("white","yellow","red","green","blue"),
              ..., border="gray60", vertical=NULL, xpd=NA)

### Arguments

`loc` | a vector of the form c(x1,x2,y1,y2) giving the drawing rectangle for the subplot in coordinates as in par("usr"). I.e. if the plot is logrithmic the base 10 logarithm is to be used: x1left boundary of drawing rectangle y1lower boundary of drawing rectangle x2right boundary of drawing rectangle y2upper boundary of drawing rectangle
`portions` | The portions of different missing categories
`labels` | The labels for the categories.
`col` | The colors to plot the different categories.
`...` | further graphical parameters passed to `text`
`border` | The color to draw the borders of the rectangles.
`vertical` | Should a horizontal or a vertical plot be produced. If NULL the choice is done automatically according to the size of the recangle provided.
`xpd` | extended plot region. See `par("xpd")`.

### Details

This function is typically not called directly,however it could in principle be used to add to plots. The user will modify the function call only to modify the appearance of the missing plot.

The labels are only plotted for nonzero portions. In this way it is always possible to realize the presence of a given missing type, even if it is a too small portion to be actually displayed. In case of overplotting of different labels a further investigation using missingSummary should be used.

### Author(s)

K.Gerald v.d. Boogaart http://www.stat.boogaart.de

### See Also

`plot.aplus`

### Examples

    data(SimulatedAmounts)
    plot(acomp(sa.missings))
    plot(acomp(sa.missings),mp=~simpleMissingSubplot(c(0,0.1,0.2,1),
       missingInfo[c(1,3:5,2)],
       c("Not Missing",paste("Missing Only:",cn),"Totally Missing"),
       col=c("gray","red","green","blue","darkgray"))
    )
    ms <- missingSummary(sa.missings)
    for( i in 1:3 )
      simpleMissingSubplot(c(0.9+0.03*(i-1),0.9+0.03*i,0.2,1), ms[i,])

[Package compositions version 1.40-2 Index]