slides created using slidify, R code, app3