Bitte eingeben:

Zeit erlaubt: 90 Minuten. Bitte alle Fragen beantworten und Ihre Rmd-Datei regelmäßig speichern. Schicken Sie am Ende der Klausur Ihre Rmd Datei an Jonathan Harrington Email = .

Daten & Packages laden

Laden Sie die folgenden Packages und Data-Frames:

library(tidyverse)
library(broom)
library(gridExtra)
library(lmerTest)
library(emmeans)
library(MuMIn)
library(afex)
sigmoid = function(x, k = 0, m = 1) {
  exp(m * x + k) / (1 + exp(m * x + k))
}
urla = "https://www.phonetik.uni-muenchen.de/studium_lehre/"
urlb = "lehrmaterialien/R_speech_processing/Rdf"
url = paste0(urla, urlb)
syntax.df = read.table(file.path(url, "syntax.df.txt"), 
                          stringsAsFactors = T)

s.df = read.table(file.path(url, "sret.df.txt"), 
                          stringsAsFactors = T)
bund.df = read.table(file.path(url, "bund.df.txt"), 
                          stringsAsFactors = T)
g.df = read.table(file.path(url, "geschwindigkeit.df.txt"), 
                          stringsAsFactors = T)

Fragen

davor = c(220,  200,  190,  240,  250,  250,  280,  220,  300,  270,  240,  180,  160,  190,  190,  280,  240,  250,  250,  230)

danach =  c(240, 220, 190, 220, 280, 260, 280, 240, 300, 290, 250, 200, 170, 180, 180, 280, 260, 270, 270, 240)
F2 = c(651, 762, 856, 1063, 1190, 
1298, 1421, 1440, 1518, 2800, 2900, 3100 )

Dauer = c(230, 260, 300, 340, 430, 480, 520, 570, 580, 600,620, 640)