Я хочу иметь возможность передать аргумент из функции в метку на ggplot
графике и , чтобы эта метка была выделена жирным шрифтом.Unicode не будет работать, потому что многие символы Unicode не отображаются в pdf.Выражения Plotmath можно разделить на paste()
, что делает их идеальными для такого рода работы, однако я не могу понять, как заставить выражение Plotmath bold(x)
выделять жирным шрифтом всю скомпилированную строку.
Например, этот код ...
y <- 5
(g <- ggplot(data.frame(x = rnorm(100,0,1)), aes(x)) +
geom_histogram(bins = 100, fill = "skyblue") +
annotate("text", x = 1.5, y = 4, label = paste0("bold(x<=", y, "^{2})"), parse = T))
... дает ...
Как вы можете видеть, специальный символ (меньше или равно) получился хорошо.Однако проблема в том, что х выделен жирным шрифтом, но не остальная часть строки.Как мне выделить всю строку таким образом, чтобы она по-прежнему позволяла мне передавать внешний объект y
в строку?