rezultati <- read.table("/cloud/project/Izpitno gradivo/Kolokvij 1 - 26. 6. 2021/Rezultati/Rezultati_1kolokvij.csv", header=TRUE, sep=";", dec=",")
Najvišja ocena je bila 8 točk od 10, zato sem vsem prištel bonus 2 točki. V kolikor imate skupaj z bonusom vsaj 4 točke, lahko pristopite na 2. kolokvij, ki bo 5. 7. 2021 ob 17.30 na EF (Velika dvorana). Na Canvasu so že odprte prijave.
rezultati$K1_28_06_2021_Točke <- rezultati$SM_1_kolokvij_28062021/10
rezultati$K1_28_06_2021_Točke_Bonus <- rezultati$K1_28_06_2021_Točke + 2 #Dodani 2 bonus točki.
library(pastecs)
round(stat.desc(rezultati$K1_28_06_2021_Točke_Bonus), 2)
##      nbr.val     nbr.null       nbr.na          min          max        range          sum       median         mean 
##        51.00         0.00         0.00         2.00        10.00         8.00       321.00         6.00         6.29 
##      SE.mean CI.mean.0.95          var      std.dev     coef.var 
##         0.25         0.51         3.25         1.80         0.29
library(ggplot2)
ggplot(rezultati, aes(x = K1_28_06_2021_Točke_Bonus)) +
  geom_bar() +
  scale_x_continuous(breaks = (seq(min(rezultati$K1_28_06_2021_Točke_Bonus), 
                                       max(rezultati$K1_28_06_2021_Točke_Bonus), 
                                       by = 1))) +
  xlab("Doseženo število točk") +
  ylab("Frekvenca") +
  geom_vline(xintercept = 3.5, col = "red") +
  stat_function(fun = function(x) dnorm(x, 
                                        mean = mean(rezultati$K1_28_06_2021_Točke_Bonus), 
                                        sd = sd(rezultati$K1_28_06_2021_Točke_Bonus)) * 51 * 1,
                                        color = "darkred", size = 1)

table(rezultati$K1_28_06_2021_Točke_Bonus)
## 
##  2  3  4  5  6  7  8  9 10 
##  2  1  6  6 11 12  8  4  1
rezultati$IzpolnjenPogoj <- ifelse(rezultati$K1_28_06_2021_Točke_Bonus >= 4, "DA", "NE")
print(rezultati[, c(1, 11, 12, 13)])
##    Vpisnaštevilka K1_28_06_2021_Točke K1_28_06_2021_Točke_Bonus IzpolnjenPogoj
## 1        19165597                   8                        10             DA
## 2        19210623                   7                         9             DA
## 3        19437352                   7                         9             DA
## 4        19552724                   7                         9             DA
## 5        19572011                   7                         9             DA
## 6        19112435                   6                         8             DA
## 7        19152017                   6                         8             DA
## 8        19298666                   6                         8             DA
## 9        19451665                   6                         8             DA
## 10       19477792                   6                         8             DA
## 11       19501372                   6                         8             DA
## 12       19540676                   6                         8             DA
## 13       19572989                   6                         8             DA
## 14       19114956                   5                         7             DA
## 15       19146108                   5                         7             DA
## 16       19248238                   5                         7             DA
## 17       19253672                   5                         7             DA
## 18       19268584                   5                         7             DA
## 19       19384437                   5                         7             DA
## 20       19396487                   5                         7             DA
## 21       19418883                   5                         7             DA
## 22       19504741                   5                         7             DA
## 23       19538430                   5                         7             DA
## 24       19573359                   5                         7             DA
## 25       19850149                   5                         7             DA
## 26       19142983                   4                         6             DA
## 27       19153618                   4                         6             DA
## 28       19193521                   4                         6             DA
## 29       19268647                   4                         6             DA
## 30       19433949                   4                         6             DA
## 31       19460537                   4                         6             DA
## 32       19486401                   4                         6             DA
## 33       19538341                   4                         6             DA
## 34       19572931                   4                         6             DA
## 35       19573673                   4                         6             DA
## 36       19830747                   4                         6             DA
## 37       19115511                   3                         5             DA
## 38       19450395                   3                         5             DA
## 39       19522907                   3                         5             DA
## 40       19757861                   3                         5             DA
## 41       19777583                   3                         5             DA
## 42       19857241                   3                         5             DA
## 43       19164881                   2                         4             DA
## 44       19214701                   2                         4             DA
## 45       19268694                   2                         4             DA
## 46       19506997                   2                         4             DA
## 47       19542402                   2                         4             DA
## 48       19840401                   2                         4             DA
## 49       19240726                   1                         3             NE
## 50       19210450                   0                         2             NE
## 51       19268563                   0                         2             NE