diff --git a/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_ang.R b/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_ang.R index 4d5b39109..3d21ddaa7 100644 --- a/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_ang.R +++ b/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_ang.R @@ -79,7 +79,7 @@ data <- subset(data, skupina == ID) # ?e oddelek nima podatka oziroma je manjkajo?a vrednost, # ga odstranimo v izogib errorju pri izdelavi frekven?ne tabele -data <- subset(data, oddelek_ime != -1) +#data <- subset(data, oddelek_ime != -1) # Izberemo samo koncane ankete data <- subset(data, status == 6) diff --git a/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_dan.R b/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_dan.R index c8235c64c..11a3d8e52 100644 --- a/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_dan.R +++ b/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_dan.R @@ -81,7 +81,7 @@ if (data[1, 1] == ("Ustreznost") | # Izberemo dokon?ane ankete skupine 1 in odstranimo podatke brez oddelka data <- data %>% subset(skupina == ID) %>% - subset(oddelek_ime != -1) %>% + #subset(oddelek_ime != -1) %>% subset(status == 6) # Odstranimo vrstice, ki vsebujejo vrednosti neveljavnih odgovorov (od -1 do -5) diff --git a/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_slo.R b/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_slo.R index c6a47b254..ff1dc46bb 100644 --- a/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_slo.R +++ b/admin/survey/modules/mod_EVOLI/R/Evoli_org_employ_meter_slo.R @@ -82,7 +82,7 @@ if (data[1, 1] == ("Ustreznost") | # Izberemo dokon?ane ankete skupine 1 in odstranimo podatke brez oddelka data <- data %>% subset(skupina == ID) %>% - subset(oddelek_ime != -1) %>% + #subset(oddelek_ime != -1) %>% subset(status == 6) # Odstranimo vrstice, ki vsebujejo vrednosti neveljavnih odgovorov (od -1 do -5) diff --git a/admin/survey/modules/mod_EVOLI/R/Evoli_teamship_meter_ang.R b/admin/survey/modules/mod_EVOLI/R/Evoli_teamship_meter_ang.R index 41a775c48..329e1cb42 100644 --- a/admin/survey/modules/mod_EVOLI/R/Evoli_teamship_meter_ang.R +++ b/admin/survey/modules/mod_EVOLI/R/Evoli_teamship_meter_ang.R @@ -77,7 +77,7 @@ data <- subset(data, skupina == ID) # ?e oddelek nima podatka oziroma je manjkajo?a vrednost, # ga odstranimo v izogib errorju pri izdelavi frekven?ne tabele -data <- subset(data, oddelek_ime != -1) +#data <- subset(data, oddelek_ime != -1) # Izberemo samo koncane ankete data <- subset(data, status == 6) diff --git a/admin/survey/modules/mod_EVOLI/R/Evoli_teamship_meter_slo.R b/admin/survey/modules/mod_EVOLI/R/Evoli_teamship_meter_slo.R index 92c280dea..ecb90d6b0 100644 --- a/admin/survey/modules/mod_EVOLI/R/Evoli_teamship_meter_slo.R +++ b/admin/survey/modules/mod_EVOLI/R/Evoli_teamship_meter_slo.R @@ -83,7 +83,7 @@ if (data[1, 1] == ("Ustreznost") | # Izberemo dokon?ane ankete skupine 1 in odstranimo podatke brez oddelka data <- data %>% subset(skupina == ID) %>% - subset(oddelek_ime != -1) %>% + # subset(oddelek_ime != -1) %>% subset(status == 6) # Odstranimo vrstice, ki vsebujejo vrednosti neveljavnih odgovorov (od -1 do -5)