layout_summary(x)
my_pres <- read_pptx() layout_summary ( x = my_pres )
Run the code above in your browser using DataLab