Проверьте этот параметр opensource prject https://github.com/jitbit/vs-unused-image-finder
http://minhdanh2002.blogspot.com /2010/05/identifying-used-and-unused-resources.html
В основном вам нужно проанализировать ваш код aspx и получить список asp-тегов изображений или тегов img. Получите атрибут src или imageurl, а затем поместите его в список, чтобы получить все используемые изображения. Получите список каталогов на своем веб-сайте и проверьте, не используется ли оно для списка из изображений страницы. Хотя изображения могут ссылаться через реальный или абсолютный путь, поэтому вы должны принять это во внимание.
Мне удалось сначала сохранить граф ggplot2
в формате .png, а затем вызвать этот файл в ph_with_img
. Немного окольным, но это работает. Вы также можете сохранить график как ?tempfile
, а затем ?unlink
, но мне немного нравится иметь папку с моими графиками.
ggplot() +
(code for my ggplot)
ggsave("../thisplot.png", width = 6, height = 4)
read_pptx() %>%
add_slide(layout = "Title and Content", master = "Office Theme") %>%
ph_with_img(src = "../thisplot.png", width = 6, height = 4, type = "body") %>%
print(target = t)
Я только что сделал новый пакет export
, построенный поверх officer
, который легко позволяет сделать это с помощью команды graph2ppt()
и который хорошо экспортирует в векторный формат, в отличие от растрового изображения в другом ответе, опубликованном выше например,
install.packages("export")
library(export)
library(ggplot2)
qplot(Sepal.Length, Petal.Length, data = iris, color = Species,
size = Petal.Width, alpha = I(0.7))
graph2ppt(file="plots.pptx", width=6, height=5)