Na izpitu je bilo možno doseči največ 75 točk. Končna ocena je določena kot: % dosežen na izpitu * 75 točk + Kolokvija

podatki <- read.table("./Rezultati 3. izredni rok.csv", header=TRUE, sep=";", dec=",")

podatki <- podatki[c(1:5), c(1:7)]

Rezultati

print(podatki[c(1, 4, 5, 6, 7)])
##     Vpisna  K_skupaj Izpit3_odstotek Izpit3_skupaj Izpit3_ocena
## 1 19491130  9.205227           73.33      64.20273            7
## 2 19428739 11.931818           40.00      41.93182            5
## 3 19160536 14.500000           33.33      39.49750            5
## 4 19485303 12.955227           20.00      27.95523            5
## 5 19177838 15.500000            6.67      20.50250            5

Izpit3_odstotek: Dosežen odstotek na izpitu, za pozitivno oceno je treba na izpitu doseči bsaj 50 %.