Statistika

Simulace alternativního rozdělení

---

hod<-sample(c(0, 1), size = 1000, replace = TRUE)
barplot(hod)

Deskriptivní analýza výšek studentů Statistiky 1

data <- read.csv("data_vyska.txt")
mean(data$vyska)

## [1] 170.9797

median(data$vyska)

## [1] 169

sd(data$vyska)

## [1] 9.467914

var(data$vyska)

## [1] 89.6414

quantile(data$vyska)

##   0%  25%  50%  75% 100% 
##  153  164  169  177  198

quantile(data$vyska,0.25)

## 25% 
## 164

hist(data$vyska)

boxplot(data$vyska)