Add text to plot
Adds text to the scene. The text is positioned in 3D space. Text is always oriented towards the camera.
text3d(x, y = NULL, z = NULL, texts, adj = 0.5, pos = NULL, offset = 0.5, usePlotmath = is.language(texts), ...) texts3d(x, y = NULL, z = NULL, texts, adj = 0.5, pos = NULL, offset = 0.5, usePlotmath = is.language(texts), ...)
x, y, z |
point coordinates. Any reasonable way of defining the
coordinates is acceptable. See the function |
texts |
text character vector to draw |
adj |
one value specifying the horizontal adjustment, or two, specifying horizontal and vertical adjustment respectively. |
pos |
a position specifier for the text. If specified, this
overrides any |
offset |
when |
usePlotmath |
logical. Should |
... |
In the other functions, additional parameters to pass to |
The adj
parameter determines the position of the text relative to the
specified coordinate. Use adj = c(0, 0)
to place the left bottom corner at
(x, y, z)
, adj = c(0.5, 0.5)
to center the text there, and adj = c(1, 1)
to put the right top corner there. The optional second coordinate for vertical
adjustment defaults to 0.5
. Placement is done using the "advance" of
the string and the "ascent" of the font relative to the baseline, when these metrics
are known.
text3d
and texts3d
draw text using the r3d
conventions. These are synonyms; the former is singular to be
consistent with the classic 2-D graphics functions, and the latter is
plural to be consistent with all the other graphics primitives. Take
your choice!
If any coordinate or text is NA
, that text is not plotted.
If usePlotmath
is TRUE
, the work will be done
by the plotmath3d
function instead of rgl.texts
. This is the default if the texts
parameter is “language”, e.g. the result of
a call to expression
or quote
.
The text drawing functions return the object ID of the text object (or sprites, in case of usePlotmath = TRUE
)
invisibly.
r3d
, rgl.texts
, plotmath3d
, rglExtrafonts
for adding fonts
open3d() famnum <- rep(1:3, 8) family <- c("serif", "sans", "mono")[famnum] font <- rep(rep(1:4, each = 3), 2) cex <- rep(1:2, each = 12) text3d(font, cex, famnum, text = paste(family, font), adj = 0.5, color = "blue", family = family, font = font, cex = cex)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.