Sara Wójcik-Murawska
Gr. 602
Test01, Zestaw 12
Obliczono wartości dochodu w 5 małych firmach oznaczonych AA,BB,CC,DD,EE.
Otrzymano następujące wyniki:
1.23, 1.64, 2.59, 3.19, 1.32
1. Naniesienie danych na układ współrzędnych
dane<-c(1.23, 1.64, 2.59, 3.19, 1.32)
> plot(dane, axes=FALSE, ann=FALSE)
> title(xlab="Firmy", ylab="Dochod")
> axis(1, at=1:5, lab=c("AA","BB","CC","DD","EE"))
> axis(2, ylim=c())
> box()
> mean(dane)
[1] 1.994
> abline(h=mean(dane), col="blue")
> for(i in 1:5) (lines(c(i,i),c(dane[i], mean(dane)),col="red")
Otrzymano następujący wykres:
\
2. Obliczenie wartości średniej z próby dla danych
> dane
[1] 1.23 1.64 2.59 3.19 1.32
> mean(dane) /* funkcja mean() jest funkcją obliczającą średnią
[1] 1.994
3. Obliczenie wariancji z próby, odchylenia standardowego z próby, estymatora
wariancji i odchylenia standardowego.
Wariancja z próby:
> var(dane)*(4/5)
[1] 0.589784
Odchylenie standardowe z próby:
> sqrt(var(dane)*(4/5))
[1] 0.767974
Estymator wariancji:
> var(dane)
[1] 0.73723
Odchylenie standardowe:
> sqrt(var(dane))
[1] 0.858621
4. Interpretacja otrzymanego wyniku
x - 2 Ã x -Ã x x + Ã x + 2Ã
0,414 1,18 1,95 2,72 3,49
Średni dochód w badanych przedsiębiorstwach wynosi 1,95 tys zł (z odchyleniem
standardowym 0.77).
Ok. 68% badanych przedsiębiorstw posiada dochody w przedziale 1,18-2,72 tys. Zł.
(5% badanych przedsiębiorstw posiada dochody w przedziale