library(readxl)
rezultati <- read_xlsx("./MTRD 1. izredni rok - 3. 7. 2023.xlsx")
rezultati <- as.data.frame(rezultati)
- Kolokvija: Rezultat kolokvijev (30 točk max)
- Izpit_odstotek: Dosežen rezultat na izpitu.
- Izpit_tocke: Pretvorjen rezultat na izpitu v končne točke.
- SKUPAJ: Končne točke, ki vključujejo rezultat kolokvija, in so
osnova za določitev končne ocene.
print(rezultati[c(1, 4, 5, 6, 7, 8)])
## Vpisna Kolokvija Izpit_odstotek Izpit_tocke SKUPAJ Ocena
## 1 19610023 26.8 86.67 100.0 96.8 10
## 2 19184358 20.3 86.67 100.0 91.0 10
## 3 19205571 20.8 73.33 84.6 81.0 9
## 4 19590882 24.4 66.67 76.9 78.2 8
## 5 19418258 22.2 60.00 69.2 71.0 8
## 6 19590840 16.2 60.00 69.2 64.7 7
## 7 19435056 16.0 60.00 69.2 64.5 7
## 8 19614557 25.9 40.00 46.2 61.0 7
## 9 19273458 9.5 60.00 69.2 58.0 6
## 10 19472939 13.8 53.33 61.5 56.9 6
## 11 19441625 13.3 53.33 61.5 56.4 6
## 12 19468539 16.5 46.67 53.8 54.2 6
## 13 19181907 21.1 40.00 46.2 53.4 6
## 14 19590259 15.2 46.67 53.8 52.9 6
## 15 19610002 15.7 40.00 46.2 51.0 6
## 16 19368991 14.7 40.00 46.2 51.0 6
## 17 19184096 13.3 46.67 53.8 51.0 6
## 18 19428739 11.9 40.00 46.2 44.2 5
## 19 19485303 13.0 33.33 38.5 39.9 5
## 20 19592413 17.0 26.67 30.8 38.6 5
## 21 19491130 9.2 33.33 38.5 36.1 5
## 22 19160536 14.5 26.67 30.8 36.1 5