library(ggplot2)
library(dplyr)
library(ez)

###########################################################################
# 1. 'Uebungen'
###########################################################################

# 1.
# Fuer den in R vorhandenen Data-Frame 'trees' pruefen Sie
# inwiefern 'Height' aus 'Volume'  vorhersagbar ist. 
# Schaetzen Sie 'Height' ein bei einem Volumen von 110.

head(trees)


# 2. 
# Fuer diese Daten wurde F2 - F1 (Hz) in einem Vokal
# zwischen 1910 und 1997 gemessen. aendert sich F2-F1 mit der Zeit?
# Wenn ja, schaetzen Sie den Wert von F2-F1 ein im Jahr 2012.

jahr = c(1910, 1920, 1930, 1940, 1950, 1959, 1969, 1978, 1987, 1997)
fdat = c(139, 149, 157, 175, 216, 303, 390, 449, 462, 487)


# 3. 
# Die Grundfrequenz wurde in der selben Person
# in einem Zeitraum von 10 Jahren gemessen (d.h. eine Messung pro Jahr).
# Der erste Werte ist aus den Jahr 1987, der letzte aus dem Jahr 1996:
# 137.0   131.2   127.1   123.4   119.2   114.6   109.6   104.5   99.4    95.3
# Aendert sich die Grundfrequenz mit der Zeit?
# Wenn ja, welchen Wert muesste f0 im Jahr 2000 gehabt haben?