Когда я создаю карту, используя ggplot2
, и пытаюсь выделить часть названия рисунка курсивом, используя комбинацию expression()
и italic()
, используя строку, моя карта выглядит так, как хотелось бы:
plottitle <- expression(paste('Example map with ', italic('italics')))
crimes <- data.frame(state = tolower(rownames(USArrests)), USArrests)
states_map <- map_data("state")
map <- ggplot(crimes, aes(map_id = state)) +
geom_map(aes(fill = Murder),
map = states_map) +
expand_limits(x = states_map$long,
y = states_map$lat) +
labs(title = plottitle)
map
Однако, когда я пытаюсь сделать то же самое, но использую объект вместо строки, объект не оценивается как нужная строка:
word <- 'italics'
plottitle2 <- expression(paste('Example map with ', italic(word)))
map <- ggplot(crimes, aes(map_id = state)) +
geom_map(aes(fill = Murder),
map = states_map) +
expand_limits(x = states_map$long,
y = states_map$lat) +
labs(title = plottitle2)
map
Как я могу получить вектор word
для оценки перед применением italic()
?