#Na izptu je bilo možno doseči največ 70 točk (glej StatističneMetode_Točke_70max), katerim se prišteje rezultat 2. kolokvija (glej Kolokvij2_15max), skupaj torej največ 85 točk (glej SM_rezultat_85max). Doseženo število točk se nato pretvori v max 110 točk (glej SM_točke_110max) - za pozitivno oceno iz statističnih metod je potrebno v tem stolpcu imeti vsaj 55,5 končnih točk, kar je zapisano v stolpcu PogojF (glej PogojF; NE = manj kot 55,5 točk, DA = vsaj 55,5 točk). Nato se upošteva število doseženih točk iz metodologije (110 max), ki jo imate že opravljeno. Na podlagi končnega številka točk, ki se določi kot povprečje rezultata iz statističnih metod in metodologije, se določi končna ocena.
rezultati <- read.table("/cloud/project/Izpitno gradivo/2. redni rok - 1. 2. 2022/Rezultati/2. redni rok SM/2. redni rok, SM - rezultati.csv", header=TRUE, sep=";", dec=",")
rezultati$PogojF <- factor(rezultati$Pogoj,
levels = c(0, 1),
labels = c("NE", "DA"))
summary(rezultati$StatističneMetode_točke_70max)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 21.00 35.00 42.00 38.82 45.50 52.50
print(rezultati[c(2, 5, 6, 7, 8, 9, 14, 11, 12, 13)])
## Vpisna StatističneMetode_odst StatističneMetode_točke_70max Kolokvij2_15max SM_rezultat_85max SM_točke_110max
## 1 19104321 35 24.5 13.5 38.0 49.2
## 2 19151123 50 35.0 9.0 44.0 56.9
## 3 19164420 60 42.0 9.0 51.0 66.0
## 4 19184831 65 45.5 9.0 54.5 70.5
## 5 19243219 50 35.0 0.0 35.0 45.3
## 6 19403784 55 38.5 6.0 44.5 57.6
## 7 19494620 30 21.0 0.0 21.0 27.2
## 8 19537705 60 42.0 9.0 51.0 66.0
## 9 19552936 65 45.5 7.5 53.0 68.6
## 10 19570190 65 45.5 5.0 50.5 65.4
## 11 19573034 75 52.5 10.5 63.0 81.5
## PogojF Metodologija_110max Končne_točke_110max Ocena
## 1 NE 76 NA 5
## 2 DA 61 59.0 6
## 3 DA 60 63.0 6
## 4 DA 57 63.8 6
## 5 NE 67 NA 5
## 6 DA 56 56.8 6
## 7 NE 66 NA 5
## 8 DA 64 65.0 6
## 9 DA 64 66.3 6
## 10 DA 70 67.7 6
## 11 DA 80 80.8 8