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)
gr.df = read.table(file.path(url, "gr.df.txt"), 
                   stringsAsFactors = T)
gr.df = gr.df %>% 
  mutate(Alc = factor(Alc, levels=c("nein", "ja")))
gram.df = read.table(file.path(url, "gram.txt"), 
                     stringsAsFactors = T)
hruch.df = read.table(file.path(url, "hruchder.df.txt"), 
                      stringsAsFactors = T)
p.df = read.table(file.path(url, "preasp.txt"), 
                  stringsAsFactors = T)
l.df = read.table(file.path(url, "langdat.df.txt"), 
                  stringsAsFactors = T)
v.df = read.table(file.path(url, "vdatader.df.txt"), 
                  stringsAsFactors = T)
links = c(527, 542, 513, 502, 542, 535, 543, 508, 539, 546, 544, 533, 524, 523, 550, 526, 531, 512, 549, 524)
rechts = c(524, 550, 545, 541, 524, 529, 549, 555, 554, 539, 552, 550, 555, 536, 554, 545, 523, 545, 525, 542)

Prüfen Sie mit einer Abbildung und statistischem Test, ob die Reaktionszeiten von dem Ohr beeinflusst werden.

  1. Y von der Gespanntheit beeinflusst wird.
  2. es eine Beziehung zwischen Y und X gibt.
  3. X und Gespanntheit miteinander interagieren.

Sie können hier Befehle eingeben, und danach 1-3 kurz (jeweils eine Zeile) begründen.