Standalone Presentation with Slidify

standalone_pres.R

---
title       : Standalone Presentation with Slidify
author      : Ramnath Vaidyanathan
mode        : standalone
---

## Plain Text

This is a slide with plain text

> 1. Point 1
> 2. Point 2
> 3. Point 3

---

## R Plot

```{r message = F}
require(ggplot2)
qplot(wt, mpg, data = mtcars)
```


---

## NVD3 Plot

```{r results = 'asis', comment = NA, message = F, echo = F}
require(rCharts)
n1 <- nPlot(mpg ~ wt, data = mtcars, type = 'scatterChart', group = 'gear')
n1$print('chart2', include_assets = TRUE, cdn = TRUE)
```

<style>
.rChart {
  height: 500px;
}
</style>


--- 

## Another NVD3 Plot

```{r results = 'asis', comment = NA, message = F, echo = F}
require(rCharts)
n2 <- nPlot(mpg ~ cyl, data = mtcars, type = 'scatterChart')
n2$print('chart3')
```

standalone_pres.Rpres

Standalone Presentation with RPres
========================================================
author: Ramnath Vaidyanathan
date: 

Plain Text
========================================================

This is a slide with plain text

- Point 1
- Point 2
- Point 3

R Plot
=======

```{r message = F}
require(ggplot2)
qplot(wt, mpg, data = mtcars)
```

NVD3 Plot
==========

```{r results = 'asis', comment = NA, message = F, echo = F}
require(rCharts)
n1 <- nPlot(mpg ~ wt, data = mtcars, type = 'scatterChart', group = 'gear')
n1$print('chart1', include_assets = TRUE, cdn = TRUE)
```

<style>
.rChart {
  height: 500px;
}
</style>

Another NVD3 Plot
==================

```{r results = 'asis', comment = NA, message = F, echo = F}
require(rCharts)
n2 <- nPlot(mpg ~ cyl, data = mtcars, type = 'scatterChart')
n2$print('chart3')
```