Erforderliche Pakete laden

library(modeest)  # Berechnung des Modus

Datensatz einlesen und Variable spezifizieren

# Datensatz einlesen
data <- read.table("https://mmi.psycho.unibas.ch/r-toolbox/data/Eingangsfragebogen11.txt", header=TRUE)

# Variable spezifizieren
Variable <- "Alter"

Masse der zentralen Tendenz

Mittelwert

mean(data[,Variable], na.rm=T)
## [1] 23.80952

Median

median(data[,Variable], na.rm=T)
## [1] 21

Modus

mlv(data[,Variable], method="naive", na.rm=T)
## [1] 20

Streuungsmasse

Standardabweichung

sd(data[,Variable], na.rm=T)
## [1] 7.235824

Varianz

var(data[,Variable], na.rm=T)
## [1] 52.35714

Spannweite, Range

range(data[,Variable], na.rm=T)
## [1] 16 52

Mediandeviation

median(abs(data[,Variable]-median(data[,Variable], na.rm=T)), na.rm=T)
## [1] 2