Load theme from existing chart

Question

Using officeR and mschart packages I'm trying to match the theme of the company presentation. Is there a way to obtain the chart theme (for a further use in mschart) from an existing chart in pptx?

Answer 1

Package officer does not implement such a function. However, you can get the color of the theme with function color_sheme() and reuse them with mschart:

x <- read_pptx()
color_scheme ( x = x )