---
title: "Watchtower - Git Commits analysieren"
author: "Jannis von Hagen"
date: "`r Sys.Date()`"
output: html_document
---
```{r echo=FALSE, include=FALSE, warning = FALSE}
system("get.data.bat")
diffs <- read.delim("data/diffs.txt")
commits <- read.csv("C:/Dev/Watchtower/data/commits.txt")

install.packages('plyr', repos = "http://cran.us.r-project.org")
library('plyr')
```

### Die Idee:
Quellcode in Programme einzuschleußen kann es Angreifern ermöglichen
Schadsoftware oder Sicherheitslücken auf einer großen Zahl an Geräten zu verteilen.  

Es währe also vorteilhaft wenn man Git Repositories automatisch auf auffällige Commits
untersuchen könnte.  

Das Ziel ist es also Commits zu untersuchen, und abweichende Commits aufzuzeigen.

```{r}
commits_u <- count(commits$name, 'commits$name')
barplot(commits_u$freq, names.arg=commits_u$commits.name)
```