rezultati <- read.table("/cloud/project/Redni rok 2  2-2-2021/Rezultati/Analiza_2RR.csv", header=TRUE, sep=";", dec=",")
colnames(rezultati)[1] <- "Vp_št."
library(pastecs)
summary(rezultati[7])
##      Ocena      
##  Min.   :22.00  
##  1st Qu.:44.00  
##  Median :58.67  
##  Mean   :57.63  
##  3rd Qu.:73.33  
##  Max.   :90.00
rezultati$Opravil <- ifelse(rezultati$Ocena >= 56, "DA", "NE")
print(rezultati[c(-2, -3)])
##      Vp_št. RezultatAPZ Rezultat_točke Bonus Ocena Opravil
## 1  19141314          12          88.00     2 90.00      DA
## 2  19143348          11          80.67     0 80.67      DA
## 3  19573097          11          80.67     0 80.67      DA
## 4  19105131          10          73.33     0 73.33      DA
## 5  19133387          10          73.33     0 73.33      DA
## 6  19152829          10          73.33     0 73.33      DA
## 7  19165534          10          73.33     0 73.33      DA
## 8  19247351          10          73.33     0 73.33      DA
## 9  19268668          10          73.33     0 73.33      DA
## 10 19302703          10          73.33     0 73.33      DA
## 11 19570164          10          73.33     2 75.33      DA
## 12 19183066           9          66.00     0 66.00      DA
## 13 19192793           9          66.00     0 66.00      DA
## 14 19215134           9          66.00     0 66.00      DA
## 15 19215684           9          66.00     0 66.00      DA
## 16 19103284           8          58.67     2 60.67      DA
## 17 19125397           8          58.67     0 58.67      DA
## 18 19162250           8          58.67     0 58.67      DA
## 19 19182345           8          58.67     0 58.67      DA
## 20 19285154           8          58.67     0 58.67      DA
## 21 19287460           8          58.67     0 58.67      DA
## 22 19555563           8          58.67     0 58.67      DA
## 23 19572341           8          58.67     0 58.67      DA
## 24 19146401           7          51.33     0 51.33      NE
## 25 19212458           7          51.33     0 51.33      NE
## 26 19241410           7          51.33     0 51.33      NE
## 27 19467339           7          51.33     0 51.33      NE
## 28 19570122           7          51.33     0 51.33      NE
## 29 19123012           6          44.00     0 44.00      NE
## 30 19143683           6          44.00     0 44.00      NE
## 31 19145240           6          44.00     0 44.00      NE
## 32 19161592           6          44.00     0 44.00      NE
## 33 19163123           6          44.00     0 44.00      NE
## 34 19164310           6          44.00     0 44.00      NE
## 35 19183307           6          44.00     0 44.00      NE
## 36 19570033           6          44.00     2 46.00      NE
## 37 19552724           5          36.67     0 36.67      NE
## 38 19142983           4          29.33     2 31.33      NE
## 39 19450395           4          29.33     0 29.33      NE
## 40 19184651           3          22.00     0 22.00      NE