III део

\(\color{firebrick}{\text{5.1.5. Box-plot}}\)

Функциjа boxplot(x), где jе x нумерички вектор jе наредба за исцртавање правоугаоног диjаграма.

boxplot(count ~ spray, data = InsectSprays, col = "lightgray")

Тумачење box-plota

Правоугаони дијаграм садржи [25%,75%] узорка, дебела линија на кутији представља медијану. Цртице иду до најмање/највеће вредности која упада у дужину од 1.5 кутије од крајева кутије. Кружићи представљају екстремне вредности.

\(\color{firebrick}{\text{5.1.6. Stripchart}}\)

Када је обим узорка мали, некада је боље користити stripchart, јер црта баш све тачке.

#install.packages("ISwR")
library(ISwR)
data(energy)
attach(energy)
head(energy)
##   expend stature
## 1   9.21   obese
## 2   7.53    lean
## 3   7.48    lean
## 4   8.08    lean
## 5   8.09    lean
## 6  10.15    lean
#делимо податке у две групе:
expend.lean<-expend[stature=="lean"]
expend.obese<-expend[stature=="obese"]

Приказаћемо четири варијенате stripcharta:

par(mfrow=c(2,2))
stripchart(expend~stature)#поделио је на групе и нацртао
stripchart(expend~stature,method="stack") #да не би дошло до гомилања, тачке исте вредности приказује као једну
stripchart(expend~stature,method="jitter")#да би се ипак све виделе, могу мало да варирају горе доле, то је метод "JITTER"
stripchart(expend~stature,method="jitter",jitter=.03)#ограничавамо да не варирају много, као у претходном

***

\(\color{firebrick}{\text{5.1.7. Dotchart}}\)

Функциjа dotchart() je функциjа за генерисање тачкастог графика. Посебно jе погодна за визуални приказ свих унесених података са вредностима коjе леже у одређеним распонима.

dotchart(VADeaths, xlim=c(0,75), xlab="Broj umrlih na 1000 ljudi",
         main="Stopa smrtnosti u Virdziniji")


\(\color{firebrick}{\text{5.1.8. Q-Q графици}}\)

Q-Q графици су врста тачкастих графика, коjи се користе да би се упоредиле расподеле две групе података или узорачка са (неком) референтном расподелом.

X <- rnorm(1000); A <- rnorm(1000); B <- rnorm(1000, mean=3, sd=2)
 C <- rt(1000, df=2); D <- exp(rnorm(1000))
 par(mfrow=c(2, 2), mar=c(3, 3, 2, 1))
 qqplot(X, A, main="A i X su iz iste raspodele")
 qqplot(X, B, main="B je reskaliran X")
 qqplot(X, C, main="C ima tezi rep")
 qqplot(X, D, main="D je pomerena u desno")