From 73b6f2ea413f4bfe458cb44d39c7bf5fa2a5f3be Mon Sep 17 00:00:00 2001
From: Reckling <karina.reckling@willenbrock.de>
Date: Fri, 20 Dec 2019 10:24:37 +0100
Subject: [PATCH 1/7] function b

demo ggplot points
---
 Datei1.txt | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/Datei1.txt b/Datei1.txt
index 6ff5635..ae779fd 100644
--- a/Datei1.txt
+++ b/Datei1.txt
@@ -1,5 +1,13 @@
 Hello!
 
+b <- function() {
+  #this function is a demo function
+  ggplot() +
+    ggpoint() +
+    scale_discrete() +
+    theme()
+}
+
 def neue_funktion():
 	print("kreativ")
 

From 44e933d40d14b2d983e723cc30a9172faedf84b6 Mon Sep 17 00:00:00 2001
From: Reckling <karina.reckling@willenbrock.de>
Date: Fri, 20 Dec 2019 10:42:53 +0100
Subject: [PATCH 2/7] python function amended

---
 Datei1.txt | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Datei1.txt b/Datei1.txt
index ae779fd..15a4f55 100644
--- a/Datei1.txt
+++ b/Datei1.txt
@@ -10,6 +10,7 @@ b <- function() {
 
 def neue_funktion():
 	print("kreativ")
+	print("sven")
 
 print("welt")
 print("issues")

From 5bc0a6d99840560b85f0ab5a0269d29c2e9373c1 Mon Sep 17 00:00:00 2001
From: Reckling <karina.reckling@willenbrock.de>
Date: Fri, 20 Dec 2019 10:38:29 +0100
Subject: [PATCH 3/7] function g

demo if else
---
 Datei1.txt | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/Datei1.txt b/Datei1.txt
index 15a4f55..e56cb47 100644
--- a/Datei1.txt
+++ b/Datei1.txt
@@ -13,6 +13,13 @@ def neue_funktion():
 	print("sven")
 
 print("welt")
+
+g <- if(b == a) {
+  print("bla bla")
+} else {
+  print("nee")
+}
+
 print("issues")
 
 plot(letters[1:5], seq(1:5))

From 7148d6fbca62ad89c27538b59b9780e3b09b6f24 Mon Sep 17 00:00:00 2001
From: Reckling <karina.reckling@willenbrock.de>
Date: Fri, 20 Dec 2019 10:39:49 +0100
Subject: [PATCH 4/7] add lines to plot

---
 Datei1.txt | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Datei1.txt b/Datei1.txt
index e56cb47..d94f196 100644
--- a/Datei1.txt
+++ b/Datei1.txt
@@ -23,6 +23,8 @@ g <- if(b == a) {
 print("issues")
 
 plot(letters[1:5], seq(1:5))
+lines(1:5, rep(1,5), col="red")
+lines(rep(2,5), 1:5, col="green")
 grid()
 
 #finale oh oh

From 3c4b0b93f66a552d4fc2e49f38acdbae2d295e8f Mon Sep 17 00:00:00 2001
From: Reckling <karina.reckling@willenbrock.de>
Date: Fri, 20 Dec 2019 10:40:56 +0100
Subject: [PATCH 5/7] add libraries

---
 Datei1.txt | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Datei1.txt b/Datei1.txt
index d94f196..31fc42a 100644
--- a/Datei1.txt
+++ b/Datei1.txt
@@ -1,3 +1,4 @@
+library(ggplot2); library(grid)
 Hello!
 
 b <- function() {

From 8c7eacfdbd09efaa27a1242b14864cdf00d5b63e Mon Sep 17 00:00:00 2001
From: Reckling <karina.reckling@willenbrock.de>
Date: Fri, 20 Dec 2019 10:23:29 +0100
Subject: [PATCH 6/7] function a

demo ggplot function
---
 Datei1.txt | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/Datei1.txt b/Datei1.txt
index 31fc42a..88ce85e 100644
--- a/Datei1.txt
+++ b/Datei1.txt
@@ -23,6 +23,14 @@ g <- if(b == a) {
 
 print("issues")
 
+a <- function() {
+  #this function is a demo function
+  ggplot() +
+    ggbar() +
+    scale_discrete() +
+    theme()
+}
+
 plot(letters[1:5], seq(1:5))
 lines(1:5, rep(1,5), col="red")
 lines(rep(2,5), 1:5, col="green")

From 62aa22a6785d053f61ed14d14c76d9544541d367 Mon Sep 17 00:00:00 2001
From: Reckling <karina.reckling@willenbrock.de>
Date: Fri, 20 Dec 2019 10:26:38 +0100
Subject: [PATCH 7/7] function c

demo function ggplot lines
---
 Datei1.txt | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/Datei1.txt b/Datei1.txt
index 88ce85e..067fc7e 100644
--- a/Datei1.txt
+++ b/Datei1.txt
@@ -13,6 +13,14 @@ def neue_funktion():
 	print("kreativ")
 	print("sven")
 
+c <- function() {
+  #this function is a demo function
+  ggplot() +
+    gglines() +
+    scale_discrete() +
+    theme()
+}
+
 print("welt")
 
 g <- if(b == a) {