From ec63fb0aabab395fd8aa690dcb20a5f1c29f3b46 Mon Sep 17 00:00:00 2001
From: hustoles <martin.hustoles@student.reutlingen-university.de>
Date: Sat, 1 Jul 2023 18:57:40 +0200
Subject: [PATCH] loading data from excel file implementation
---
DCProject.Rmd | 13 +++++++++++++
DCProject.html | 28 +++++++++++++++++++++++++++-
2 files changed, 40 insertions(+), 1 deletion(-)
diff --git a/DCProject.Rmd b/DCProject.Rmd
index ad30acf..8dd5738 100644
--- a/DCProject.Rmd
+++ b/DCProject.Rmd
@@ -17,6 +17,10 @@ runtime: shiny_prerendered
```{r setup, include=FALSE}
library(learnr)
+library(readxl)
+
+current_dir = getwd()
+data <- read_excel(file.path(current_dir, "Datensatz.xlsx"))
```
## Titelseite
@@ -110,8 +114,17 @@ Größe des Datensatzes: 24 Zeilen und 10 Spalten
## Datenaufbereitung
+
## Datenanalyse
+Hier ist uner tatsächlicher Datensatz:
+```{r}
+print(data)
+```
+
+### Eigenschaften der Daten
+### Hypothesentest
+
## Ergebnispräsentation
## Teaminfos
diff --git a/DCProject.html b/DCProject.html
index 7b06c03..c2512a1 100644
--- a/DCProject.html
+++ b/DCProject.html
@@ -592,6 +592,28 @@ erhöht.</li>
</div>
<div id="section-datenanalyse" class="section level2">
<h2>Datenanalyse</h2>
+<p>Hier ist uner tatsächlicher Datensatz:</p>
+<pre class="r"><code>print(data)</code></pre>
+<pre><code>## # A tibble: 31 × 10
+## Semester Deutsche ...3 ...4 Ausländer ...6 ...7 Insgesamt ...9 ...10
+## <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr>
+## 1 <NA> männlich weibli… Insg… männlich weib… Insg… männlich weib… Insg…
+## 2 WS 1998/99 907403 727254 1634… 92321 73673 1659… 999724 8009… 1800…
+## 3 WS 1999/00 872178 723246 1595… 95460 79605 1750… 967638 8028… 1770…
+## 4 WS 2000/01 870016 741820 1611… 99906 87121 1870… 969922 8289… 1798…
+## 5 WS 2001/02 887462 774628 1662… 107831 98410 2062… 995293 8730… 1868…
+## 6 WS 2002/03 903218 808567 1711… 117205 1098… 2270… 1020423 9183… 1938…
+## 7 WS 2003/04 935718 837611 1773… 125826 1203… 2461… 1061544 9579… 2019…
+## 8 WS 2004/05 901979 814795 1716… 124220 1221… 2463… 1026199 9369… 1963…
+## 9 WS 2005/06 912696 824712 1737… 124447 1239… 2483… 1037143 9486… 1985…
+## 10 WS 2006/07 909740 822934 1732… 122923 1234… 2463… 1032663 9463… 1979…
+## # ℹ 21 more rows</code></pre>
+<div id="section-eigenschaften-der-daten" class="section level3">
+<h3>Eigenschaften der Daten</h3>
+</div>
+<div id="section-hypothesentest" class="section level3">
+<h3>Hypothesentest</h3>
+</div>
</div>
<div id="section-ergebnispräsentation" class="section level2">
<h2>Ergebnispräsentation</h2>
@@ -605,6 +627,10 @@ erhöht.</li>
<script type="application/shiny-prerendered" data-context="server-start">
library(learnr)
+library(readxl)
+
+current_dir = getwd()
+data <- read_excel(file.path(current_dir, "Datensatz.xlsx"))
</script>
<script type="application/shiny-prerendered" data-context="server">
@@ -634,7 +660,7 @@ session$onSessionEnded(function() {
<!--/html_preserve-->
<!--html_preserve-->
<script type="application/shiny-prerendered" data-context="execution_dependencies">
-{"type":"list","attributes":{"names":{"type":"character","attributes":{},"value":["packages"]}},"value":[{"type":"list","attributes":{"names":{"type":"character","attributes":{},"value":["packages","version"]},"class":{"type":"character","attributes":{},"value":["data.frame"]},"row.names":{"type":"integer","attributes":{},"value":[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42]}},"value":[{"type":"character","attributes":{},"value":["backports","base","bslib","cachem","checkmate","cli","compiler","datasets","digest","ellipsis","evaluate","fastmap","fontawesome","graphics","grDevices","htmltools","htmlwidgets","httpuv","jquerylib","jsonlite","knitr","later","learnr","lifecycle","magrittr","methods","mime","promises","R6","Rcpp","rlang","rmarkdown","rprojroot","sass","shiny","stats","tools","utils","withr","xfun","xtable","yaml"]},{"type":"character","attributes":{},"value":["1.4.1","4.2.3","0.5.0","1.0.8","2.2.0","3.6.1","4.2.3","4.2.3","0.6.31","0.3.2","0.21","1.1.1","0.5.1","4.2.3","4.2.3","0.5.5","1.6.2","1.6.11","0.1.4","1.8.5","1.43","1.3.1","0.11.4","1.0.3","2.0.3","4.2.3","0.12","1.2.0.1","2.5.1","1.0.10","1.1.1","2.22","2.0.3","0.4.6","1.7.4","4.2.3","4.2.3","4.2.3","2.5.0","0.39","1.8-4","2.3.7"]}]}]}
+{"type":"list","attributes":{"names":{"type":"character","attributes":{},"value":["packages"]}},"value":[{"type":"list","attributes":{"names":{"type":"character","attributes":{},"value":["packages","version"]},"class":{"type":"character","attributes":{},"value":["data.frame"]},"row.names":{"type":"integer","attributes":{},"value":[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51]}},"value":[{"type":"character","attributes":{},"value":["backports","base","bslib","cachem","cellranger","checkmate","cli","compiler","datasets","digest","ellipsis","evaluate","fansi","fastmap","fontawesome","glue","graphics","grDevices","htmltools","htmlwidgets","httpuv","jquerylib","jsonlite","knitr","later","learnr","lifecycle","magrittr","methods","mime","pillar","pkgconfig","promises","R6","Rcpp","readxl","rlang","rmarkdown","rprojroot","sass","shiny","stats","tibble","tools","utf8","utils","vctrs","withr","xfun","xtable","yaml"]},{"type":"character","attributes":{},"value":["1.4.1","4.2.3","0.5.0","1.0.8","1.1.0","2.2.0","3.6.1","4.2.3","4.2.3","0.6.31","0.3.2","0.20","1.0.4","1.1.1","0.5.1","1.6.2","4.2.3","4.2.3","0.5.5","1.6.2","1.6.11","0.1.4","1.8.4","1.43","1.3.1","0.11.4","1.0.3","2.0.3","4.2.3","0.12","1.9.0","2.0.3","1.2.0.1","2.5.1","1.0.10","1.4.2","1.1.0","2.22","2.0.3","0.4.6","1.7.4","4.2.3","3.2.1","4.2.3","1.2.3","4.2.3","0.6.1","2.5.0","0.39","1.8-4","2.3.7"]}]}]}
</script>
<!--/html_preserve-->
</div>
--
GitLab