From 39d19d5dcf3588572b49086688d6c1d4e9e72a07 Mon Sep 17 00:00:00 2001
From: Jan Klemkow <j.klemkow@wemelug.de>
Date: Sat, 12 May 2012 10:48:40 +0200
Subject: doc: Add ploting scripts for sevenday and random.

---
 random_plot.m   | 12 ++++++++++++
 sevenday_plot.m | 20 ++++++++++++++++++++
 2 files changed, 32 insertions(+)
 create mode 100644 random_plot.m
 create mode 100644 sevenday_plot.m

diff --git a/random_plot.m b/random_plot.m
new file mode 100644
index 0000000..8020734
--- /dev/null
+++ b/random_plot.m
@@ -0,0 +1,12 @@
+
+min_data = min(min(train_data));
+max_data = max(max(train_data));
+
+count = zeros(max_data - min_data + 1, 1);
+
+for i = min_data:max_data
+	count(i - min_data + 1) = sum(sum(train_data == i));
+end
+
+plot(count, '-o')
+bar(count)
diff --git a/sevenday_plot.m b/sevenday_plot.m
new file mode 100644
index 0000000..393b4cd
--- /dev/null
+++ b/sevenday_plot.m
@@ -0,0 +1,20 @@
+X = [0 0 7 7 14 14 21 21 28 28 35 35 42 42];
+Y = [0 1 1 0  0  1  1  0  0  1  1  0  0  1];
+
+%plot(X + 3, Y * 3800, '-k', 'linewidth', 1);
+plot(sum(q'), '-ob;(Summe) Original;', 'linewidth', 2);
+hold on;
+ylim([0 4000]);
+xlim([0 42]);
+xlabel('Tage');
+ylabel('Quantitaet');
+
+print('doc/image/sevenday_window.svg', '-dsvg')
+
+plot(29:42, sum((pred_list{5})'), '-or;(Summe) Vorhersage;', 'linewidth', 2);
+%ylim([0 4000]);
+%xlim([0 14]);
+xlabel('Tage');
+ylabel('Quantitaet');
+print('doc/image/sevenday_pred.svg', '-dsvg')
+hold off;
-- 
cgit