R: adds lines of text in a rectangular-shaped box or in a...

textrect {diagram} | R Documentation

## adds lines of text in a rectangular-shaped box or in a parallelogram to a plot

### Description

Adds one or more lines of text, centered around "mid" in a rectangular box, or in a paralellogram

### Usage

    textrect(mid, radx, rady = radx*length(lab), lwd = 1,
             shadow.size = 0.01, adj = c(0.5, 0.5),
             lab = "", box.col = "white",
             lcol = "black", shadow.col = "grey", angle = 0, ...)

    textparallel (mid, radx, rady = radx*length(lab), lwd = 1,
             shadow.size = 0.01, adj = c(0.5, 0.5),
             lab = "", box.col = "white",
             lcol = "black", shadow.col = "grey",
             angle = 0, theta = 90, ...)

### Arguments

`mid` | midpoint (x,y) of the box.
`radx` | horizontal radius of the box.
`rady` | vertical radius of the box.
`lwd` | line width of line surrounding the box.
`shadow.size` | relative size of shadow.
`adj` | text adjustment.
`lab` | one label or a vector string of labels to be added in box.
`box.col` | fill color of the box.
`lcol` | line color surrounding box.
`shadow.col` | color of shadow.
`angle` | rotation angle, degrees.
`theta` | angle of the bottom, left corner of the parallelogram, in degrees.
`...` | other arguments passed to function textplain.

### Details

see `shadowbox` for specifications of the rectangular box and its shadow.

### Author(s)

Karline Soetaert <karline.soetaert@nioz.nl>

Thanks to Michael Folkes for the code of the parallelogram.

### See Also

`textdiamond`, `textellipse`, `textempty`, `texthexa`, `textmulti`, `textplain`, `textround`

### Examples

      openplotmat(xlim = c(-0.1, 1.1), main = "textrect")
      for (i in 1:10)
        textrect(mid = runif(2), col = i, radx = 0.1, rady = 0.1,
                lab = LETTERS[i], cex = 2)

      openplotmat(xlim = c(-0.1, 1.1), main = "textparallel")
      elpos <-coordinates (c(1, 1, 1, 1, 1))

      textparallel(mid = elpos[1,], col = 1, radx = 0.2, rady = 0.1,
                lab = "theta=20", theta = 20)
      textparallel(mid = elpos[2,], col = 1, radx = 0.2, rady = 0.1,
                lab = "theta=60", theta = 60)
      textparallel(mid = elpos[3,], col = 1, radx = 0.2, rady = 0.1,
                lab = "theta=100", theta = 100)
      textparallel(mid = elpos[4,], col = 1, radx = 0.2, rady = 0.1,
                lab = "theta=140", theta = 140)
      textparallel(mid = elpos[5,], col = 1, radx = 0.2, rady = 0.1,
                lab = "theta=170", theta = 170)

[Package diagram version 1.6.4 Index]