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

Description Usage Arguments Details Author(s) See Also Examples

View source: R/textrect.R

Description

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

Usage

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
  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)


diagram documentation built on May 19, 2017, 10:16 p.m.
Search within the diagram package
Search all R packages, documentation and source code

Questions? Problems? Suggestions? Tweet to @rdrrHQ or email at ian@mutexlabs.com.

Please suggest features or report bugs in the GitHub issue tracker.

All documentation is copyright its authors; we didn't write any of that.