The hardware and bandwidth for this mirror is donated by METANET, the Webhosting and Full Service-Cloud Provider.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]metanet.ch.

For Easy Reproducible Research

require(rrtable)
require(ggplot2)

Introduction

If you are a data scientist or researcher, you will certainly be interested in reproducible research. With R package rrtable, you can make a MS Powerpoint file easily with a R code.

Make The Powerpoint File with R plot/ggplot

You can make the Powerpoint file easily with R plot with or without R code.

x=ggplot(mtcars,aes(x=wt,y=mpg))+geom_point()

You can make a Powerpoint file with this ggplot object.

plot2pptx(x)

If you want to show R code as well as plot, you can use R code string and set the echo argument TRUE.

x="ggplot(mtcars,aes(x=wt,y=mpg))+geom_point()"
plot2pptx(x,echo=TRUE,title="A ggplot")

By default, “Report.pptx” file will be generated

You can append a plot to existing Powerpoint file with a string of R code.

plot2pptx("plot(iris)",echo=TRUE,append=TRUE)

You can add R code on the slide by setting the argument echo TRUE.

Add a data.frame to the Powerpoint file

You can add a data.frame to the Powerpoint file.

table2pptx("head(iris)", echo=TRUE,append=TRUE)

Add the result of R code to the Powerpoint file

You can add the R code and the result of R code to the Powerpoint file

fit=lm(mpg~ wt*hp, data=mtcars)
Rcode2pptx("summary(fit)",append=TRUE)

Add the result of statistical analysis to the Powerpoint file

You can add the result of statistical analysis to the Powerpoint file

fit2=aov(yield ~ block + N * P + K, data = npk)
table2pptx(fit2,title="ANOVA result",append=TRUE,vanilla=TRUE)

Or

table2pptx("aov(yield ~ block + N * P + K, data = npk)",
           title="ANOVA result",echo=TRUE,append=TRUE,vanilla=TRUE)

You can use class of “matrix”,“lm”,“fitdistr”,“nls”,“aov”,“anova”,“glm”,“coxph”,“prcomp” or “summary.prcomp” object using table2pptx() file.

Adding the 2 plots/ggplots on a slide

You can add 2 plots on a slide side by side.

x=c("plot(iris)","ggplot(mtcars,aes(x=hp,y=mpg))+geom_point()")
plot2office(x,title="2 plots",parallel=TRUE,echo=TRUE,append=TRUE)

You can download sample Powerpoint file: Report.pptx - view with office web viewer

Shiny app using package rrtable

You can see the shiny app using package rrtable with the following R command.

shiny::runApp(system.file('pptxList',package='rrtable'))  

Press the load SampleData button of the shiny app and enjoy!

These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.