From 3158fefa3aaef0953db142772b062be320650f45 Mon Sep 17 00:00:00 2001
From: Reckling <karina.reckling@willenbrock.de>
Date: Fri, 20 Dec 2019 11:07:34 +0100
Subject: [PATCH] =?UTF-8?q?ggplot=20verl=C3=A4ngert?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 demoFZSTAM.R | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/demoFZSTAM.R b/demoFZSTAM.R
index 8b92e73..5b36c72 100644
--- a/demoFZSTAM.R
+++ b/demoFZSTAM.R
@@ -10,4 +10,6 @@ test <- sqlQuery(channel, stringsAsFactors=F,
 odbcCloseAll(); rm(channel)
 
 ggplot(test, aes(x=FAZFI)) +
-  geom_bar(color="blue", fill=rgb(0.1,0.4,0.5,0.7) )
+  geom_bar(color="blue", fill=rgb(0.1,0.4,0.5,0.7) ) +
+  scale_fill_hue(c = 40) +
+  theme_bw()