dettmering

```{r echo = FALSE, results = 'show'}
library(knitr)
```

# Vergleich Pendeln mit Auto vs. Bahn mit BahnCard 50

```{r}
# Fahrten pro Jahr (Wochenenden pro Jahr abzgl. Urlaub/Feiertage)

n.fahrten <- (52 - 7) * 2 # Fahrten in eine Richtung

dettmering

#!/bin/bash

# This can take a while. Run in a screen environment.

# Modify for the version you want to install.
RVERSION=3.2.2

sudo apt-get install screen gfortran libreadline6-dev libx11-dev libxt-dev

cd ~

dettmering

library(caret)

library(doMC)
registerDoMC(cores = 4) # use multiple cores

set.seed(1234)

col.of.interest <- c(
        'response', 'A', 'B', 'C'
)

dettmering

#!/bin/bash
# Rename image files with md5 hash

mkdir out

for f in *.tif
do
	splt=(${f//_/ })
	c=$(cat ${splt[0]}\_${splt[1]}\_* | md5) # 329L_23_*
	o=${splt[0]}\_${splt[1]}\-${c:0:10}\_${splt[2]}