Relacije ‐ Občine - bavla/biblio GitHub Wiki

  1. Export vsakega od sheetov v CSV
  2. zdruzim iste tematike za relacije vlak in bus, dodam stevilke za relacije (1 = vlak, 2 = bus) in shranim datoteke kot CSV
  3. preveri kako iz excela naredim da ni csv
  4. pozenes spodnjo kodo v Rju

""" source("https://raw.githubusercontent.com/bavla/Rnet/master/R/Pajek.R")

#Navodila: https://github.com/bavla/Rnet/tree/master/R

wdir <- "C:/Users/markb/OneDrive/Vlado/obcina celje"

setwd(wdir)

P <- read.csv2("relacije.csv", header=FALSE)

head(P)

colnames(P) <- c("Od", "Do", "Prevoz")

S <- c(P$Od, P$Do) s <- factor(S)

lab <- levels(s) lab

u <- factor(P$Od, levels=lab) v <- factor(P$Do, levels = lab)

uvLab2net(lab,u,v,P$Prevoz,Net="Pajek.net",dir=TRUE) """

  1. Odpres pajek datoteko v editorju in dodas *Arcs :2 "bus" 13 41 2
    13 76 2
    13 4 2
    13 41 2
    13 38 2
    13 68 2
    *Arcs :1 "vlak"

  2. Pozenes Pajka in odpres ini file -> vse nastavitve so tam

  3. Skopiram imena obcin in za vsako dolocim koordinate, najboljse kar v chat gpt Primer: 1 "Ajdovščina" 45.8873 13.9119

  4. Narišeš sliko

  5. Fit area: Options/Transform/Fit area/prva opcija

  6. Obrneš: Options/Transform/Rotate

  7. Spremembe: Resize + Translate

  8. Zdruzimo povezave iz veckratnih v eno, ki ima vsoto utezi: Network/Create New Network/Transform/Remove/Multiple Lines/Sum Values

  9. Pokazemo posamicno relacijo: Options/Lines/Draw Lines/Relations/stevilka relacije

Kako se znebimo praznih obcin:

  1. Network/Multiple Relation Network/Into one network/izberes relacijo
  2. izracun stopenj: network/Partition/Degree/All
  3. Operations/Network + Partition/Extract/1. opcija