text (x, ...) text.default (x, y = NULL, labels = seq(along = x), adj = NULL, ...)
x, y
|
numeric vectors of coordinates where the text
labels should be written. If the length of x and
y differs, the shorter one is recycled.
|
labels
| character or expression with the text to be written. |
adj
| character or expression with the text to be written. |
...
|
further graphical parameters (from par),
such as cex, etc.
|
text draws the strings given in the vector labels at the
coordinates given by x and y.
y may be missing since xy.coords(x,y) is used for
construction of the coordinates.labels must be of type character or
expression. In the latter case, quite a bit of
mathematical notation is available such as sub- and superscripts,
greek letters, fractions, etc.
adj allows adjustment of the text with respect to (x,y).
mtext, title.
plot(-1:1,-1:1, type = "n", xlab = "Re", ylab = "Im")
K <- 16; text(exp(1i * 2 * pi * (1:K) / K), col = 2)
plot(1:10, 1:10, main = "text(..) examples\n~~~~~~~~~~~~~~",
sub = "R is GNU ©, but not ® ..")
mtext("«ISO-accents»: ± éè øØ å<Å æ<Æ", side=3)
points(c(6,2), c(2,1), pch = 3, cex = 4, col = "red")
text(6, 2, "the text is CENTERED around (x,y) = (6,2) by default",
cex = .8)
text(2, 1, "or Left/Bottom - JUSTIFIED at (2,1) by `adj = c(0,0)'",
adj = c(0,0))
text(4, 9, expression(hat(beta) == (X^t * X)^{-1} * X^t * y))
text(4, 8.4, "expression(hat(beta) == (X^t * X)^{-1} * X^t * y)", cex = .6)
text(4, 7, expression(bar(x) == sum(frac(x[i], n), i==1, n)))
text(4, 6.4, "expression(bar(x) == sum(frac(x[i], n), i==1, n))", cex = .6)
text(8, 5, expression(paste(frac(1, sigma*sqrt(2*pi)), " ",
plain(e)^{frac(-(x-mu)^2, 2*sigma^2)})))
text(5,10.2,"Le français, c'est façile: Règles, Liberté, Egalité, Fraternité..")
text(5,9.8, "Jetz no chli züritüütsch: (noch ein bißchen Zürcher deutsch)")