podatki <- read.table("./MTRD 2022_2023.csv", header=TRUE, sep=";", dec=",")

podatki <- podatki[1:3, ]

Rezultati

print(podatki[c(1, 8:13)])
##   Vpisnaštevilka K_skupaj Bonus Predrok_odst Predrok_tocke Skupaj Ocena
## 1       19206135     20.5  0.00        93.33            70   90.5    10
## 2       19203815     19.0  0.00        80.00            60   79.0     8
## 3       19203878     14.5  1.75        46.67            35     NA     5