Loading
For å kunne bruke funksjonenen i orgdata
pakke, må
pakken først gjort tilgjengelig. Kjør denne komandoen:
library(orgdata)
Du får spørsmål om å oppdatere når ny versjon er tilgjengelig. Svar
YES
til spørsmålet for å oppdatere. Evt. kan du også gjøre
det manuelt ved å kjøre:
update_khpackage("orgdata")
Objekt
OBS! HUSK Å ALLTID TILORDNE ET OBJEKT for make_file()
og
read_file()
! Dvs. bruk symbol <-
. Ellers
blir ikke resultatene tilgjengelig til lagring eller videre
behandling.
dt <- make_file()
dvs. ^
Les filer
Les original fil som det er ved å velge FILID
df <- les_fil(file = 12) #12 er en FILID
les_fil()
kan også brukes til å lese data ved å skrive
hele stien til filen og kan brukes til å lese filer i flere formater
bl.a .xls
, .xlsx
, ..dta
,
.csv
etc.
df <- les_fil("C:/Users/abc/FileName.csv")
Lag filgrupper
Aggregere utvalgte fil eller filer med KOBLID
dt <- lag_fil("BEFOLKNING", koblid = 13)
dt <- lag_fil("BEFOLKNING", koblid = c(13, 15, 20))
Les filene i en filgruppe og bruk oppsettet som er spesifisert i Access
dt <- lag_fil("BEFOLKNING")
## les fra original filen selv om filene allerede er sjekket som KONTROLLERT
## dvs. allerede ligger i datavarehus
dt <- lag_fil("BEFOLKNING", raw = TRUE)
Lagre resultatene eller objekter
Hvis man har tilordnet resultat fra lag_fil()
som et
objekt, kan objektet lages til en .csv
fil ved å kjøre:
save_file(dt, "BEFOLKNING")
Å lagre filen et annet utvalgte sted enn standard
save_file(dt, name = "MinFil", path = "C:/Navn/Til/Mappen")
Evt. hvis alle filer har ingen feil dvs. allerede kontrollert
lag_fil("BEFOLKNING", save = TRUE)
Flere filgrupper
Hvis filene har blitt kontrollert så kan man lagre flere FILGRUPPER med en gang, du velger selv måten du liker å gjøre det. FILGRUPPE blir lagret som csv direkte. Ingen feilmelding er gitt.
fgp <- c("BEFOLKNING", "NEET", "DODE") #med " "
lag_filgrupper(fgp)
Eller
lag_filgrupper(BEFOLKNING, NEET, DODE) #uten
Tips and Tricks
Lest bare et bestemt antall rader f.eks 5 rader kan også brukes andre argumenter f.eks header = FALSE, skip = 0, sep = ; osv. Sjekk dokumentet.
les_fil(file = 1, nrows = 5)
Sjekk koding:
# Sjekk kategorier evt. omkoding
df <- les_fil(file = 1)
se_fil(df) #alle kolonner
se_fil(df, 1) #bare kolonne 1
se_fil(df, c(1:5)) #kolonner 1 til 5
se_fil(df, c(1,4,6))
se_fil(df, LANDBAK, INNVKAT)
df[, .N, keyby = landb] #kategori for landb i original data
dt <- lag_fil("TEST01", koblid = 1)
dt[, .N, keyby = LANDB] #kategori i omkodet aggregerte data
dt[, .N, keyby = LANDF]
# Få å finne kategorier bare for kommune eller spesifik kjonn
dt[LEVEL == "kommune", .N, keyby = LANDBAK]
dt[KJONN == 1, .N, keyby = LANDBAK]
# Sjekk koder f.eks GEO 1050110
dt[GEO == 1050110]
# Sjekk flere koder samtidig
dt[GEO %in% c(1050110, 1050122)]
# Sjekk GEO koder starter med 301
dt[GEO %like% "^301"]
# Sjekk GEO avsluttet med 99
dt[GEO %like% "99$"]
# Se alle rader i datasettet
View(df)
# Se logfiler
read_log("code00", 343) #343 er en KOBLID
read_log("code99", 343)
# Åpne hjemmeside
website()
# Sjekk versjon
packageVersion("orgdata")
# Se alle global options
names(orgdata:::opt.orgdata)
orgdata:::opt.orgdata #default verdi