rezultati <- read.table("/cloud/project/Izpitno gradivo/3. redni rok - 5. 9. 2022/Rezultati/Celota/Rezultati MTRD 5. 9. 2022.csv", header=TRUE, sep=";", dec=",")
Podan je dosežen reultat na izpitu v odstotku (0-100 %). V kolikor
ste dosegli vsaj 50 %, imate pri pogoju vrednost 1, drugače 0. Če ste
dosegli pogoj, se prišetejeta rezultat 1. in 2. kolokvija (0-100 %).
Nato se določi končna ocena kot 70 točk na izpitu, 15 točk na prvem in
15 točk na drugem kolokviju. V kolikor ste dosegli vsaj 55,5 točk (glej
stolpec Točke), imate pozitivno oceno, drugače 5.
print(rezultati[c(-1, -2, -3)])
## Vpisna.številka Izpit_odstotek Pogoj K1 K2 Točke Ocena
## 1 19590657 75 1 80.00 30 69.0 7
## 2 19183967 70 1 66.67 40 65.0 7
## 3 19589809 70 1 53.33 70 67.5 7
## 4 19130852 65 1 66.67 40 61.5 6
## 5 19184054 65 1 46.67 40 58.5 6
## 6 19591451 60 1 93.33 40 62.0 6
## 7 19190073 65 1 60.00 20 57.5 6
## 8 19213411 55 1 53.33 30 51.0 5
## 9 19162931 55 1 53.33 40 52.5 5
## 10 19186266 50 1 66.67 30 49.5 5
## 11 19525695 45 0 NA NA NA 5
## 12 19180793 45 0 NA NA NA 5
## 13 19144671 45 0 NA NA NA 5
## 14 19183050 45 0 NA NA NA 5
## 15 19560720 45 0 NA NA NA 5
## 16 19589568 35 0 NA NA NA 5
## 17 19590259 35 0 NA NA NA 5
## 18 19155196 30 0 NA NA NA 5