Символы Unicode не отображаются при экспорте в pdf в R

Question

Я пытаюсь экспортировать некоторые символы Unicode в формате U +1xxxx из R в pdf с помощью ggplot2 (это один из примеров: https://unicode-table.com/en/1F321/ ). В R вывод отличный, если он есть в ggtitle как ggtitle("Temperature range \U1F321"):

Однако, когда я экспортирую график в PDF, он выглядит следующим образом:

Я пробовал много вещей, которые предлагали другие (например, использование cairo pdf и пакета showtext), но ничего из этого не сработало. Я использую Windows.

Большое спасибо!

РЕДАКТИРОВАТЬ: я сохраняю как pdf, используя pdf("example.pdf") или cairo_pdf("example.pdf")

Воспроизводимый код:

      ggplot(mtcars, aes(x=cyl, y=mpg)) + geom_point() + ggtitle("Temperature range \U1F321") 

cairo_pdf("plot_cairo.pdf")
ggplot(mtcars, aes(x=cyl, y=mpg)) + geom_point() + ggtitle("Temperature range \U1F321") 
dev.off()

pdf("plot_normal.pdf")
ggplot(mtcars, aes(x=cyl, y=mpg)) + geom_point() + ggtitle("Temperature range \U1F321") 
dev.off()

Кроме того, просто хочу более четко изложить свои намерения. Я просто стремлюсь экспортировать ggplot с высоким разрешением из R в Word. Когда я экспортирую его как изображение, символы отображаются хорошо, но разрешение низкого качества. Следуя предложениям других пользователей, я сначала экспортирую его как pdf, а затем импортирую в Word как объект из вкладки «Вставка»:

Используя этот метод, график в Word имеет гораздо лучшее разрешение, но символы Unicode не отображаются должным образом. Так что, если, возможно, у кого-то есть другое предложение о том, как получить высококачественный ggplot, экспортированный из R в Word, при этом сохраняя символы Unicode, это также сработает! Спасибо!!