Add answers to section 4

auswertung.R

@@ -167,21 +167,92 @@ modulausfall.wi = nrow(subset(modulausfall.betroffene, studiengang=="M. Sc. Wirt
   | studiengang=="B. Sc. Wirtschaftsinformatik"
   | studiengang=="M. Sc. International Information Systems Management"))
 
+# Unterrichtsformen und Technologien
 
+## Lehrmethoden
+lehrmethoden.audiovl = table(data$lehrmethoden.SQ001.)["Ja"]
+lehrmethoden.videovl = table(data$lehrmethoden.SQ002.)["Ja"]
+lehrmethoden.podcast = table(data$lehrmethoden.SQ003.)["Ja"]
+lehrmethoden.textchat = table(data$lehrmethoden.SQ004.)["Ja"]
+lehrmethoden.videochat = table(data$lehrmethoden.SQ005.)["Ja"]
 
+lehrmethoden.table = array(c(
+  lehrmethoden.audiovl,
+  lehrmethoden.videovl,
+  lehrmethoden.podcast,
+  lehrmethoden.textchat,
+  lehrmethoden.videochat
+), dimnames=list(c(
+  "Audio-Vorlesung",
+  "Video-Vorlesung",
+  "Podcast (nur Audio)",
+  "Textchat",
+  "Interaktiver Audio-/Videochat"
+)))
 
+lehrmethoden.preparation = function () par(mar=c(3, 14, 1, 3)+.1)
+draw_barplot(lehrmethoden.table, "lehrmethoden", horizontal=TRUE, preparation=lehrmethoden.preparation, height=200)
 
+## Technologien
+technologien.labels = c(
+  "Microsoft Teams",
+  "Panopto / sonstiger Videoupload",
+  "Zoom",
+  "VC-Foren",
+  "Big Blue Button",
+  "Rocket.Chat",
+  "DFNconf",
+  "Skype",
+  "Sonstige"
+)
+technologien.table = array(c(0, 0, 0, 0, 0, 0, 0, 0, 0), dimnames=list(technologien.labels))
 
+technologien.preparation=function () par(mar=c(3,14,1,3)+.1)
+for (x in c(1:9)) {
+  t = table(data[paste("technologien.", x, ".", sep="")], exclude = c(""))
+  draw_barplot(sort(t),
+    paste("technologien-", x, sep=""),
+    horizontal=TRUE,
+    preparation=technologien.preparation,
+    height=30*nrow(t)+50)
 
-zoom_users = subset(data, technologien.1. == "Zoom"
+  for (label in technologien.labels) {
+    if (label %in% names(t)) {
+      technologien.table[label] = technologien.table[label] + t[label]
+    }
+  }
+}
+
+draw_barplot(sort(technologien.table),
+  "technologien-gesamt",
+  horizontal=TRUE,
+  preparation=technologien.preparation)
+
+## Zoombesorgnis
+zoom_users = subset(data,
+  (technologien.1. == "Zoom"
   | technologien.2. == "Zoom" | technologien.3. == "Zoom"
   | technologien.4. == "Zoom" | technologien.5. == "Zoom"
   | technologien.6. == "Zoom" | technologien.7. == "Zoom"
-  | technologien.8. == "Zoom" | technologien.9. == "Zoom")
+  | technologien.8. == "Zoom" | technologien.9. == "Zoom"))
 
 zoom_users.total = nrow(zoom_users)
-zoom_users.criteria_satisfied = nrow(subset(zoom_users, zoombesorgnis == "Ja."))
+write(zoom_users.total, file = "results/zoom-users.tex", append = FALSE)
-zoom_users.criteria_not_satisfied = nrow(subset(zoom_users, zoombesorgnis == "Nein."))
+
+zoom_users.worried = nrow(subset(data, zoombesorgnis == "Ja."))
+write(zoom_users.worried, file = "results/zoom-users-worried.tex", append = FALSE)
+
+zoom_users.not_worried = nrow(subset(data, zoombesorgnis == "Nein."))
+write(zoom_users.not_worried, file = "results/zoom-users-not-worried.tex", append = FALSE)
+
+
+## Zoomteilnahme
+zoom_users.criteria_satisfied = nrow(subset(data, zoomteilnahme == "Die Lehrveranstaltungen erfüllen überwiegend eines oder beide der Kriterien."))
+write(zoom_users.criteria_satisfied, file = "results/zoom-users-criteria-satisfied.tex", append = FALSE)
+
+zoom_users.criteria_not_satisfied = nrow(subset(data, zoomteilnahme == "Die Lehrveranstaltungen erfüllen überwiegend keines der Kriterien."))
+write(zoom_users.criteria_not_satisfied, file = "results/zoom-users-criteria-not-satisfied.tex", append = FALSE)
+
 
 
 # barplot(studiengaenge.rel, horiz=TRUE, legend=c("B. Sc. WI", "B. Sc. AI", …))

auswertung.tex

@@ -8,6 +8,8 @@
 \usepackage{enumitem}
 \usepackage{cleveref}
 \usepackage{float}
+\usepackage{csquotes}
+\usepackage{url}
 
 \title{Auswertung der Umfrage zur aktuellen Studiensituation an der Fakultät WIAI}
 \author{Anika Amma und Florian Knoch \\ Fachschaft WIAI,
@@ -23,6 +25,7 @@ Zur Vorbereitung der Lehrkonferenz im Sommersemester 2020 haben wir eine Umfrage
 \input{sections/01-allgemeines.tex}
 \input{sections/02-persoenliche-belastung.tex}
 \input{sections/03-modulangebot.tex}
+\input{sections/04-unterrichtsformen-und-technik.tex}
 
 \newpage
 

results/zoom-users-criteria-not-satisfied.tex

@@ -0,0 +1 @@
+55

results/zoom-users-criteria-satisfied.tex

@@ -0,0 +1 @@
+17

results/zoom-users-not-worried.tex

@@ -0,0 +1 @@
+42

results/zoom-users-worried.tex

@@ -0,0 +1 @@
+51

results/zoom-users.tex

@@ -0,0 +1 @@
+84

sections/04-unterrichtsformen-und-technik.tex

@@ -0,0 +1,89 @@
+\section{Unterrichtsformen und Technologien}
+
+\subsection{Welche Lehr- und Betreuungsformen kommen in den von dir besuchten Veranstaltungen zum Einsatz?}
+
+\begin{figure}[H]
+  \includegraphics[width=\textwidth]{results/lehrmethoden.png}
+  \caption{Welche Lehr- und Betreuungsformen kommen in den von dir besuchten Veranstaltungen zum Einsatz? (Mehrfachnennung möglich)}
+  \label{fig:lehrmethoden}
+\end{figure}
+
+\subsubsection{Welche Technologien kommen in den von dir besuchten Veranstaltungen am häufigsten zum Einsatz?}\label{sec:technologie}
+
+Bei dieser Frage konnte jeder Technologie nach der Häufigkeit ihres Einsatzes ein Rang zugeordnet werden.
+Wir führen die ersten drei Ränge auf sowie eine Gesamtübersicht.
+
+\begin{figure}[H]
+  \includegraphics[width=\textwidth]{results/technologien-1.png}
+  \caption{Welche Technologien kommen in den von dir besuchten Veranstaltungen am häufigsten zum Einsatz?}
+  \label{fig:technologien}
+\end{figure}
+
+\begin{figure}[H]
+  \includegraphics[width=\textwidth]{results/technologien-2.png}
+  \caption{Welche Technologien kommen in den von dir besuchten Veranstaltungen am zweithäufigsten zum Einsatz?}
+  \label{fig:technologien}
+\end{figure}
+
+\begin{figure}[H]
+  \includegraphics[width=\textwidth]{results/technologien-3.png}
+  \caption{Welche Technologien kommen in den von dir besuchten Veranstaltungen am dritthäufigsten zum Einsatz?}
+  \label{fig:technologien}
+\end{figure}
+
+\begin{figure}[H]
+  \includegraphics[width=\textwidth]{results/technologien-gesamt.png}
+  \caption{Welche Technologien kommen in den von dir besuchten Veranstaltungen am häufigsten zum Einsatz? (Summe aller Nennungen)}
+  \label{fig:technologien}
+\end{figure}
+
+\subsection{Welche sonstigen Technologien werden in deinen Veranstaltungen eingesetzt?}
+Als Antwort auf diese Frage wurden angegeben: \begin{inparaitem}
+  \item Menti
+  \item frag.jetzt
+  \item OneDrive
+  \item BSCW
+  \item Podcast Plus
+  \item EdX
+  \item Quiz-Arena in PSI-EiRBS-B
+  \item WhatsApp
+  \item Freehand by InVision
+\end{inparaitem}
+
+\subsection{Bist du über den Einsatz von Zoom besorgt? Warum oder warum nicht?}
+
+Insgesamt zeigten sich \input{results/zoom-users-worried.tex}Teilnehmer*innen besorgt.
+\input{results/zoom-users-not-worried.tex}der Befragten gaben an, dass sie über den Einsatz von Zoom nicht besorgt seien.
+
+In ihren Antworten auf die Frage in \cref{sec:technologie} erwähnten nur \input{results/zoom-users.tex}der Teilnehmer*innen den Einsatz von Zoom in ihren Lehrveranstaltungen.
+Dass mehr als nur diese Personen an der Nachfrage teilgenommen haben, war möglich, da diese Frage nicht nur dann angezeigt wurde, wenn Zoom bereits im Ranking erwähnt wurde.
+Für den Gegenstand der Frage sollte dies vernachlässigbar sein.
+
+Als \textbf{Gründe für eine Besorgnis} beim Einsatz von Zoom wurden hauptsächlich Datenschutz- und Sicherheitsbedenken genannt, außerdem wurde auf bestehende Alternativsoftware (insbesondere Microsoft Teams) verwiesen.
+
+Diejenigen, die angegeben hatten, nicht über den Einsatz von Zoom besorgt zu sein, nannten dafür folgende \textbf{Argumente für Zoom}:
+\begin{compactitem}
+  \item Zuverlässigkeit und Bedienbarkeit
+  \item Eignung für interaktive Formate
+  \item Aufenthaltsort kann durch virtuelle Hintergründe verborgen werden
+  \item Gleichgültigkeit gegenüber geteilten Daten
+  \item auch andere Unternehmen seien bereits im Besitz der Daten
+\end{compactitem}
+
+\subsection{Werden die Kriterien des Rechenzentrums von den Veranstaltungen, in denen Zoom eingesetzt wird, erfüllt?}
+
+Diese Frage wurde begleitet von folgendem Text:
+
+\begin{displayquote}
+Das Rechenzentrum der Universität empfiehlt, die Nutzung von Zoom zu begrenzen:
+»Für Veranstaltungen, an denen ausschließlich Beschäftigte und Studierende der Universität Bamberg teilnehmen, empfehlen wir weiterhin die Nutzung von Microsoft Teams, weil es bei Zoom einige Zweifel an der Vertrauenswürdigkeit des Dienstes im Hinblick auf Datenschutz und Datensicherheit gibt.«\footnote{\url{https://www.uni-bamberg.de/rz/news/artikel/campuslizenz-zoom-ist-da/}}
+Für den Einsatz der Software sieht es folgende Szenarien vor:
+\begin{itemize}
+  \item Lehrveranstaltungen mit \textbf{mehr als 250 Teilnehmerinnen und Teilnehmern}
+  \item Lehrveranstaltungen mit \textbf{vielen externen Teilnehmerinnen und Teilnehmern} (z. B. vhb-Kurse)
+\end{itemize}
+Werden die Kriterien des Rechenzentrums von den Veranstaltungen, in denen Zoom eingesetzt wird, erfüllt?
+\end{displayquote}
+
+Diese Frage beantworteten \input{results/zoom-users-criteria-satisfied.tex}Teilnehmer*innen mit \enquote{Die Lehrveranstaltungen erfüllen überwiegend eines oder beide der Kriterien}.
+Eine Mehrheit von \input{results/zoom-users-criteria-not-satisfied.tex}Teilnehmer*innen hingegen gab an, \enquote{[d]ie Lehrveranstaltungen erfüll[t]en überwiegend keines der Kriterien}.