OrenBochman

My first examples with [***knitr***](http://yihui.name/knitr/)
-----------------------------------------
Let's include some simple R code:
```{r}
1+2
```
That worked.

Let's include a plot:
```{r fig.width=4, fig.height=4}

OrenBochman

dat <- data.frame(party=c("CDU", "FDP", "CSU", "SPD",
                          "The Left", "The Greens"),
                  members.of.parliament=c(193, 93, 44, 
                                          146, 76, 68))
library(googleVis)
## Doughnut chart - a pie with a hole
doughnut <- gvisPieChart(dat, 
                      options=list(
                        width=500,
                        height=500,

OrenBochman

dat <- data.frame(Product=c("Milk", "Butter", "Yoghurt", "<b>Sum</b>"),
                  Revenue=c(2230, 43908, 231, 46369))
dat <- within(dat, {'% of Revenue' <- c(Revenue / Revenue[4])})

library(googleVis)
tbl <- gvisTable(dat, options=list(width=300, height=150),
                 formats=list(Revenue="#,###", '% of Revenue'='#.#%'),
                 chartid="formattedtable")
plot(tbl)

OrenBochman

set.seed(1234)
dat <- data.frame(x=LETTERS[1:10], y_1=sample(15,10), y_2=sample(150,10))
area2 <- gvisAreaChart(xvar="x", yvar=c("y_1", "y_2"), data=dat,
  			options=list(
			series="[{targetAxisIndex:0}, 
                                 {targetAxisIndex:1}]",
                        vAxes="[{viewWindowMode:'explicit',
				viewWindow:{min:0, max:10}},
				{viewWindowMode:'explicit',
				 viewWindow:{min:0, max:100}}]",

OrenBochman

From Wikipedia:

Epicyclic gearing or planetary gearing is a gear system consisting of one or more outer gears, or planet gears, revolving about a central, or sun gear. … Epicyclic gearing systems also incorporate the use of an outer ring gear or annulus, which meshes with the planet gears.

Use the menu in the top-left to change the frame of reference, fixing the specified gear in-place.

OrenBochman

---
title       : RevealJS with Bootstrap
framework   : revealjs
widgets     : [bootstrap]            # {mathjax, quiz, bootstrap}
---

## Read-And-Delete

1. Edit YAML front matter
2. Write using R Markdown

OrenBochman

'''
 to make this work you need to have Open-Knesset source and latest db file
 from the shell type::

   $ python manage.py shell_plus
   In [1]: ed tomer.py
'''
import json, urllib2

votes=[6904,7454,6786]

OrenBochman

/**
 * A script to automate requesting data from Google Analytics.
 *
 * @author [email protected] (Nick Mihailovski)
 */


/**
 * The name of the configration sheet.
 * And various parameters.

OrenBochman

#
# PREDICTING LONG TERM CUSTOMER VALUE WITH BTYD PACKAGE
# Pareto/NBD (negative binomial distribution) modeling of 
# repeat-buying behavior in a noncontractual setting
#
# Matthew Baggott, [email protected]
#
# Accompanying slides at:
# http://www.slideshare.net/mattbagg/baggott-predict-customerinrpart1#
#

OrenBochman

#
# PREDICTING LONG TERM CUSTOMER VALUE WITH BTYD PACKAGE
# Pareto/NBD (negative binomial distribution) modeling of 
# repeat-buying behavior in a noncontractual setting
#
# Matthew Baggott, [email protected]
#
# Accompanying slides at:
# http://www.slideshare.net/mattbagg/baggott-predict-customerinrpart1#
#