Statistik Übung1 - Aufgabe1

Antworten
tacoppar
Beiträge: 13
Registriert: 04.10.2011 10:26

Statistik Übung1 - Aufgabe1

Beitrag von tacoppar »

Hier die Kommandos für die beiden Plots (Haeufigkeit- und kumulierte Haeufigkeit):

> w1 <- read.table(file="../R/U1-A1.txt",head=TRUE)
> names(w1)
[1] "mk" "nk"
> w1$mk
[1] 0 1 2 3 4 5
> w1$nk
[1] 4 1 1 0 7 5
> x2 <- c(rep(w1$mk,w1$nk))
> x2
[1] 0 0 0 0 1 2 4 4 4 4 4 4 4 5 5 5 5 5
> barplot(w1$nk/sum(w1$nk),names=as.character(min(w1$mk):max(w1$mk)),
+ xlab="Probability",ylab="Number",xpd=TRUE)
> barplot(cumsum(w1$nk)/sum(w1$nk),names=as.character(min(w1$mk):max(w1$mk)),
+ xlab="Probability",ylab="Number",xpd=TRUE)

Die Datei "U1_A1.txt} hat folgenden Inhalt (nicht alle Eintraege wurden hier reproduziert:

mk nk
0 4
1 1
2 1
3 0
4 7
5 5

tjvogel
Beiträge: 1
Registriert: 04.10.2011 18:22

Re: Statistik Übung1 - Aufgabe1

Beitrag von tjvogel »

Danke David, so hats bei mir jetzt auch geklappt, jedoch hab ich bisher falsch gerechnet... Gruess

Antworten