Zuletzt editiert: 10.07.2012 12:31
Befehle für R
Beispiele
Syntax
| Code | Wirkung |
|---|---|
| name <- 23 | Speichert 23 in der Variable "name" (Variablen und AUCH Funktionen können jederzeit überschrieben werden! Keine Typbindung.) |
|
name <- function(p1, p2, p3 = 0) { } | Erstellt eine Funktion "name" mit 3 Parametern, wobei der 3. wenn er weggelassen wird 0 ist. |
|
vec <- rep(0,4) new <- vec + 1 |
Ersteres erstellt einen Vektor/Array/Liste der Länge 4 Zweiteres addiert jedem Feld 2 dazu (wie map, auch mit Multiplikation, Division, Quadrieren etc. möglich) |
|
for (i in min : max) { } |
Eine übliche For-Schleife (while funktioniert wie üblich) |
Zufallszahlen generieren
| vec0 <- rbinom(1000,1,0.2) | Erstellt einen Vektor mit 1000 Zufallszahlen die mit der Wahrscheinlichkeit von 20% 1 sind und sonst 0. (Bernoulli-Verteilung) |
| vec0 <- dbinom(1000,1,0.2) | ?? gibt die Dichte zurück |
| vec0 <- pbinom(1000,1,0.2) | ?? gibt die Verteilungsfunktion zurück |
| vec1 <- runif(x) | Erstellt x Zufallszahlen zwischen 0 und 1 |
| vec2 <- replicate(1000,sin(0.2)) | Wiederholt einen Versuch sin(0.2) 1000 mal |
| vec3 <- sample(1:6,2,replace=TRUE) | Simuliert die Augenzahl eines Würfelwurfs mit zwei Würfeln |
| sapply(runif(100),function(x) ...) | Setzt die generierten Werte von runif in f(x) ein. |
| ceiling(runif(1)*x) | Skalierung von Zufallszahlen (ganze Zahlen von 0 bis x) |
| c(rep(0,11),rep(1,9)) | Erstellt Vektor mit 11 Nullen und 9 Einsen |
Eigenschaften berechnen
| c(vec1,vec2) | Verknüpft zwei Vektoren (Concatenate) |
| table(sim) | Gibt aus wie oft ein Wert in einem Vektor vorkommt |
| sum(sim) | Summiert die Werte im Vektor auf |
| mean(sim) | Berechnet den Mittelwert |
| median(sim) | Berechnet den Median |
| sd(sim) | Berechnet die Standardabweichung |
| mad(sim) | Berechnet die Medianabweichung |
|
IQR(sim) quantile(sim,0.75,names=0) - quantile(sim,0.25,names=0) | Berechnet die Quantilsdifferenz |
| x %in% vec | Überprüft ob x in einem Vektor vorkommt |
Funktionen berechnen, etc.
| ecdf(vec) (200) | Gibt den Wert der Funktion an der Stelle 200 aus |
| polyroot(c(1,2,3)) | Berechnet 0 = 3x² + 2x + 1 |
| uniroot(function(x) ..., lower=0, upper=1)$root | Berechnet 0 = f(x) |
| Re(imaginary) | Berechnet den reellen Teil von imaginary |
| Im(imaginary) | Berechnet den imaginären Teil von imaginary |
Ergebnis malen
| rbind(vec1, vec2) | Verknüpft die Spalten der beiden Vektoren |
| cbind(vec1, vec2) | Verknüpft die Zeilen der beiden Vektoren |
| hist(vec)) | Erstellt eine Grafik mit den Häufigkeiten |
| plot(ecdf(vec)) | Erstellt eine Grafik (ecdf ist die Empirische Verteilungsfuntion) |
Sonstiges
| source(dateiname) | Eine Datei einbinden |
| paste(string1, string2) | Verknüpft Strings und setzt ein Leerzeichen dazwischen |