Mixed Font Labels for Plotting
This function helps to format labels with bits of text in different font shapes (italics, bold, or bolditalics) and different separators. The output is intended to be used for plotting.
mixedFontLabel(..., sep = " ", italic = NULL, bold = NULL, parenthesis = NULL, always.upright = c("sp.", "spp.", "ssp."))
... |
vectors of mode character to be formatted. They may be of different lengths in which case the shortest ones are recycled. |
sep |
a vector of mode character giving the separators to be
printed between the elements in |
italic |
a vector of integers specifying the elements in
|
bold |
id. in boldface. |
parenthesis |
id. within parentheses. |
always.upright |
of vector of mode character giving the strings
to not print in italics. Use |
The idea is to have different bits of text in different vectors that
are put together to make a vector of R expressions. This vector is
interpreted by graphical functions to format the text. A simple use
may be mixedFontLabel(genus, species, italic = 1:2)
, but it is
more interesting when mixing fonts (see examples).
To have an element in bolditalics, its number must given in both
italic
and bold
.
The vector returned by this function may be assigned as the
tip.label
element of a tree of class "phylo"
, or even as
its node.label
element.
A vector of mode expression.
Emmanuel Paradis
tr <- read.tree(text = "((a,(b,c)),d);") genus <- c("Gorilla", "Pan", "Homo", "Pongo") species <- c("gorilla", "spp.", "sapiens", "pygmaeus") geo <- c("Africa", "Africa", "World", "Asia") tr$tip.label <- mixedFontLabel(genus, species, geo, italic = 1:2, parenthesis = 3) layout(matrix(c(1, 2), 2)) plot(tr) tr$tip.label <- mixedFontLabel(genus, species, geo, sep = c(" ", " | "), italic = 1:2, bold = 3) plot(tr) layout(1)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.