Как вставить водяной знак в выходы wordcloud2

Question

Мне нравится персонализировать мою графику с водяным знаком на фоновом изображении JPG или PNG.Я использую wordcloud2, RStudio, и текст может быть любым.Использование справки wordcloud1 также приветствуется.

Если wordcloud2 не может использоваться, как я заметил с помощью Letter, image, ..., wordcloud1 может быть интересным решением.

img <- readPNG(system.file("img", "Rlogo.png", package="png"), native=TRUE)

library(wordcloud2)
wordcloud2(data = demoFreq)

Например, используйте логотип R в качестве водяного знака. Я ожидаюводяной знак "R" появляется на фоне облака слова.

Answer 1

Вот один из способов решения задачи.Когда вы используете wordcloud2(), есть аргумент, который вы можете указать цвет фона (например, backgroundColor).Я думал, что backgroundColor = "transparent" будет путь.Но похоже, что выходные файлы имеют белый цвет фона.(Возможно, я делаю что-то не так. Если да, поправьте меня.) Поэтому я в конечном итоге использовал GIMP для редактирования словных облаков.Вы даже можете наложить Wordcloud поверх фонового изображения с помощью программного обеспечения.Но я решил использовать пакет magick для использования R. Чтобы сделать фоновый цвет прозрачным, см. этот вопрос .Вопрос содержит все шаги, которые вам нужно пройти.

Как только Wordcloud будет готов, вы можете запустить коды ниже.Я надеюсь, что это поможет вам.

library(magick)

# Import images
words <- image_read("my_wordcloud.png")
logo <- image_read("R.svg")

# Stack layers
img <- c(logo, words)
img <- image_scale(img, "500x500")
image_info(img)

# combine the layers into a single image 
foo <- image_flatten(img)

# Save the image
image_write(foo, path = "so.png", format = "png")