Как изменить шрифт с латексным текстом в R сюжете?

Question

Мне нужно написать текст жирным шрифтом на графике R, используя латексное содержимое, но также содержащее значение из переменной.

Есть ли способ написать в латексном тексте, содержащем также значение из переменной?

t1 <- TeX(paste("$\\textbf{\\left[\\frac{M}{L}\\right]_d =}$", sprintf(fmt="%.3f",XML), sep=""))

text(PosX1,PosY, t1, adj=c(0,0), cex=1.0, font=2)

В этом случае переменная является XML, но установка font=2 не означаетизменить шрифт значения XML ...

Здесь я написал пример с поддельным сюжетом.M / L, написанный с TeX, находится в BF, и я хотел бы получить значение 0,001 из переменной также в BF.

library(graphics)
library(latex2exp)

pdf(file="Test2.pdf", 15, 10)
par(mar=c(5.0, 5.0, 6.0, 5.0))
XML = 0.001
x = seq(0,40, 0.2)
y = 1*exp(-((x - 20)/5)^2)
plot(x,y, pch=19, cex=1.0, xlab = "X", ylab = "Y")
#
PosX = 5
PosY = 0.8
t1 <- TeX(paste("$\\textbf{\\left[\\frac{M}{L}\\right] =}$",    sprintf(fmt="%.3f",XML), sep=""))
text(PosX,PosY, t1, adj=c(0,0), cex=1.0, font=2)

dev.off()

Answer 1

Я предлагаю два изменения:

• используйте \mathbf вместо `\ textbf¸, поскольку вы находитесь в математическом режиме
• , расширяйте диапазон \mathbf и математический режим довключите число

в сочетании:

library(graphics)
library(latex2exp)

pdf(file="Test2.pdf", 15, 10)
par(mar=c(5.0, 5.0, 6.0, 5.0))
XML = 0.001
x = seq(0,40, 0.2)
y = 1*exp(-((x - 20)/5)^2)
plot(x,y, pch=19, cex=1.0, xlab = "X", ylab = "Y")
#
PosX = 5
PosY = 0.8
t1 <- TeX(paste("$\\mathbf{\\left[\\frac{M}{L}\\right] =",
                 sprintf(fmt="%.3f",XML),
                 "}$",
                 sep=""))
text(PosX,PosY, t1, adj=c(0,0), cex=1.0, font=2)

dev.off()

Результат: