diff --git a/NAMESPACE b/NAMESPACE index 70db1f4e4d5cd375526c956102e95484d877841d..770d7934be4e468f162d6bdae1f5d4568e95596b 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -2,7 +2,8 @@ export(ld.fylke.mnd) export(ld.kommune) -export(ssb_skog_omsetning) +export(regnavn.at.ref.yr) +export(t03794) export(t03895) export(t06216) export(t12750) diff --git a/R/no_regioninndeling.R b/R/no_regioninndeling.R new file mode 100644 index 0000000000000000000000000000000000000000..ca11cc737426eba63e4583ce69d4920feeb3c2fc --- /dev/null +++ b/R/no_regioninndeling.R @@ -0,0 +1,122 @@ + +#' Region navn og region kode for gitt år +#' +#' Denne funksjonen tar regionkoder og regionnavn fra en regional statistikk, +#' tar inn tabell som viser historiske endringer i regional inndeling av Norge +#' og gjør om til riktige koder og navn for et gitt referanseår (ref.yr) +#' Funksjonen fungerer for fylkesnivå inkludert landet ELLER for kommunenivå. +#' +#' @param regionstat +#' @param ref.yr +#' @param reg_level is the region level in the regionstat ("fylke" | kommune") +#' +#' @return tibble having the regional statistics including the regional +#' names and codes for the reference year in question +#' @export +#' +#' @examples regnavn.at.ref.yr(regionstat = t12750(), ref.yr = 2020 ) %>% glimpse() +regnavn.at.ref.yr<- function(regionstat, ref.yr = year(now()), reg_level = "fylke"){ + # regionstat = t12750() #for testing + + + # Fetch the relevant region reference table regref + if (reg_level == "fylke"){ regref <- regref_fylke + } else { regref <- regref_kommune} + + # harmonizing + ref.yr = as.integer(ref.yr) + +glimpse(regref) + # Fetching from regref + regref = as.data.frame(regref, stringsAsFactors = F) + regref_n <- names(regref) #their column names + regref_yr <- as.integer(stringr::str_extract(names(regref), "\\d{4}")) #year + regref_typ <- stringr::str_sub(regref_n, 5, 8) # type (code / name) + glimpse(tibble(regref_yr = regref_yr, regref_typ = regref_typ)) + +glimpse(regionstat[seq.int(1, dim(regionstat)[1], length.out = 10), ]) + + regionstat <- + regionstat %>% + dplyr::mutate(., + # for each obs in regionstat: tag which column in regreft one should fetch the name and code + # when to fit with the ref.yr. + regref_ref.yr_col_code = + max( which(regref_yr <= ref.yr & regref_typ == "code") ), + + regref_ref.yr_col_name = + max( which(regref_yr <= ref.yr & regref_typ == "name") )) + + glimpse(regionstat[seq.int(1, dim(regionstat)[1], length.out = 10), ]) + + print(paste0("regionstat$ar: ", str(regionstat$ar))) + print(paste0("regref_yr : ", str(regref_yr))) + regionstat <- + regionstat %>% + dplyr::mutate(., + # For each obsrv in the regionstat: + # which column in regref the "ar" belongs to; + # = ar_regref_col_rcode and ar_regref_col_rname + yr_regref_col_rcode = purrr::pmap_int(., .f = function(ar, ...){ + max( which( regref_yr <= ar & regref_typ == "code") ) + }), + + yr_regref_col_rname = purrr::pmap_int(., .f = function(ar, ...){ + max( which( regref_yr <= ar & regref_typ == "name") ) + })) + glimpse(regionstat[seq.int(1, dim(regionstat)[1], length.out = 10), ]) + regionstat <- + regionstat %>% + dplyr::mutate(., + + # if each regionstat$region is present in the column in regref + # corresponding to the year of observation in regionstat + # = recode_regref_row + regcode_in_regrefcol = purrr::pmap_lgl(., .f = function(region_kode, yr_regref_col_rcode, ...){ + case_when( + region_kode %in% regref[, yr_regref_col_rcode] ~ T, + TRUE ~ F) + }), + # and which row in regref the region_code belongs to: + # = recode_regref_row + regcode_regref_row = purrr::pmap_int(., .f = function(region_kode, yr_regref_col_rcode, ...){ + case_when( + region_kode %in% regref[, yr_regref_col_rcode] ~ + which( regref[, yr_regref_col_rcode] == region_kode)[1] , + TRUE ~ NA_integer_) + }) + ) %>% + # + + dplyr::mutate(., + valid_reg = + dplyr::case_when( + regcode_in_regrefcol | region_kode == "0" ~ T, + TRUE ~ F)) + + glimpse(regionstat) + + regionstat <- regionstat %>% + + dplyr::filter(., valid_reg == TRUE) %>% + +# Then we have indexes needed to pick the right row and column +# to populate both reg_k@ref.yr and reg_n@ref.yr + dplyr::mutate(., + !!sym(paste0("reg_n", ref.yr)) := coalesce(regref[cbind(regcode_regref_row, regref_ref.yr_col_name)], region), + !!sym(paste0("reg_k", ref.yr)) := coalesce(regref[cbind(regcode_regref_row, regref_ref.yr_col_code)], region_kode) + ) + + + return(regionstat) + +} + + + + + + + + + diff --git a/R/ssb_skogsavvirkning.R b/R/ssb_skogsavvirkning.R index 3793bdfe5c9c1d8831a07cdb3b885d22faddda64..65be40d6a98f84905c167de53759c8196973738c 100644 --- a/R/ssb_skogsavvirkning.R +++ b/R/ssb_skogsavvirkning.R @@ -1,3 +1,61 @@ +##### t03794 +#' Skogsavvirkning bruttoverdi t03794 +#' bruttoverdi per år av tømmer, SSB tabell 03794 +#' +#' Tabellen gir totalverdi av tømmer solgt per år og geografisk enhet, fra 1996 til 2018. +#' Litt usikker om energivirkesortimenter og ved er med. +#' https://www.ssb.no/statbank/list/skogav +#' +#' @param geolevel +#' +#' @return en tibble med hele datasetet. +#' @export +#' +#' @examples +#' t03794() +t03794 <- function(geolevel = 'fylke'){ + + if (!(geolevel %in% c("fylke", "kommune", "landet"))) {stop("warning: to get result, ret should be one of 'fylker', 'kommuner', 'landet'" )} + metadt <- PxWebApiData::ApiData("http://data.ssb.no/api/v0/no/table/03794", returnMetaData = TRUE) + regs <- unlist(purrr::flatten(metadt[[1]][3])) + + kommuner <- regs[stringr::str_length(regs) == 4] + fylker <- regs[stringr::str_length(regs) == 2] + landet <- regs[stringr::str_length(regs) == 1] + + geolevels <- list(kommune = kommuner, fylke = fylker, landet = landet) + geoselector <- which(names(geolevels) == geolevel) + + pxdt <- PxWebApiData::ApiData("http://data.ssb.no/api/v0/no/table/03794", + #Region = T, #c(landet, geolevels[[geoselector]]), + Region = c(landet, geolevels[[geoselector]]), + Tid = T, #c("2010", "2016", "2017"), + ContentsCode = T # 10i) + ) + + regioner_utvalg <- + dplyr::as.tbl(pxdt[[1]]) %>% + dplyr::rename(., bruttoverdi = value) %>% + dplyr::group_by(region) %>% + dplyr::summarize(., volumtot = sum(bruttoverdi, na.rm = T)) %>% + dplyr::filter(., volumtot > 0) %>% + dplyr::pull(., region) + + ds <- dplyr::as.tbl(pxdt[[2]]) %>% + dplyr::rename(., region_kode = Region, ar = Tid) + + bruttov <- dplyr::as.tbl(pxdt[[1]]) %>% + + dplyr::rename(., ar = år, bruttoverdi = value) %>% + dplyr::bind_cols(., (ds %>% dplyr::select(., region_kode))) %>% + dplyr::filter(., region %in% regioner_utvalg) %>% + dplyr::mutate(., ar = as.integer(ar) + ) + return(bruttov) + +} + +##### t12750 #' Skogsavvirkning priser t12750 #' prisstatistikk for tømmer fra SSB tabell 12750 #' @@ -54,7 +112,7 @@ t12750 <- function(){ - +##### t06216 #' Skogsavvirkning priser t06216 #' prisstatistikk for tømmer SSB tabell 06216 #' @@ -112,6 +170,7 @@ t06216 <- function(){ # NB: avslutta, tidsserie 1996 - 2017 return(priser) } +####### t03794 #' Skogsavvirkning volum t03895 #' Hogststatistikk for tømmer SSB tabell 03895 #' 1996 - 2018 @@ -126,15 +185,15 @@ t06216 <- function(){ # NB: avslutta, tidsserie 1996 - 2017 #' #' @examples #' t03895() -t03895 <- function( geolevel = 'fylke'){ # 1996 - 2018 +t03895 <- function(geolevel = 'fylke'){ # 1996 - 2018 - if ( !(geolevel %in% c("fylke", "kommune", "landet"))){ stop("warning: to get result, ret should be one of 'fylker', 'kommuner', 'landet'" )} + if ( !(geolevel %in% c("fylke", "kommune", "landet"))) { stop("warning: to get result, ret should be one of 'fylker', 'kommuner', 'landet'" )} metadt <- PxWebApiData::ApiData("http://data.ssb.no/api/v0/no/table/03895", returnMetaData = TRUE) regs <- unlist(purrr::flatten(metadt[[1]][3])) - kommuner <- regs[stringr::str_length(regs)==4] - fylker <- regs[stringr::str_length(regs)==2] - landet <- regs[stringr::str_length(regs)==1] + kommuner <- regs[stringr::str_length(regs) == 4] + fylker <- regs[stringr::str_length(regs) == 2] + landet <- regs[stringr::str_length(regs) == 1] geolevels <- list(kommune = kommuner, fylke = fylker, landet = landet) geoselector <- which(names(geolevels) == geolevel) @@ -158,7 +217,8 @@ t03895 <- function( geolevel = 'fylke'){ # 1996 - 2018 dplyr::rename(., region_kode = Region, ar = Tid, virkeskategori = Treslag) volum <- dplyr::as.tbl(pxdt[[1]]) %>% - dplyr::rename(., ar = år, kategoritekst = sortiment, volum_m3pris = value) %>% + + dplyr::rename(., ar = år, kategoritekst = sortiment, volum_m3pris = value) %>% dplyr::bind_cols(., (ds %>% dplyr::select(., region_kode, virkeskategori))) %>% dplyr::filter(., region %in% regioner_utvalg) %>% dplyr::mutate(., @@ -175,38 +235,11 @@ t03895 <- function( geolevel = 'fylke'){ # 1996 - 2018 stringr::str_sub(virkeskategori, 1,2) %in% c("14", "24", "34") ~ "massevirke", TRUE ~ "annet" ), - ar = as.numeric(ar) + ar = as.integer(ar) ) return(volum) } -#' SSB skogsavvirkning for salg: omsetning -#' -#' Denne henter tabellene for prishistorikk t12750 og hogstvolum t03895 og setter dem sammen. -#' https://www.ssb.no/statbank/list/skogav -#' @return en tibble med pris og volum fordelt på fylker og sortimentgrupper og år. -#' @export -#' -#' @examples -#' ssb_skog_omsetning() -ssb_skog_omsetning = function(){ - priser_t12750 <- t12750() - volum_t03895 <- t03895() - begge <- - dplyr::full_join( - priser_t12750 %>% - select(., region, region_kode, ar, treslag, virkeskategori, sortimentgruppe, pris), - volum_t03895 %>% - dplyr::filter(., ar >= min(priser_t12750$ar)) %>% - dplyr::select(., region, region_kode, ar, treslag, volum_m3pris, virkeskategori, sortimentgruppe ) %>% - dplyr::group_by(., region, region_kode, ar, treslag, virkeskategori, sortimentgruppe) %>% - dplyr::summarize(., volum_m3pris = sum(volum_m3pris)), - by = c("region", "region_kode", "ar", "treslag", "virkeskategori", "sortimentgruppe")) %>% - dplyr::rowwise() %>% - mutate(., omsetning = as.double(pris) * volum_m3pris ) %>% - ungroup() - return(begge) -} diff --git a/R/sysdata.rda b/R/sysdata.rda new file mode 100644 index 0000000000000000000000000000000000000000..111cbd1a197f00028f2aba9df0bc83a970cc85fd Binary files /dev/null and b/R/sysdata.rda differ diff --git a/README.md b/README.md index d510f9927f7687c6a3b133401858db3aac43030d..9d9eb1eca24ba498d3241067d94a2d23cce0d636 100644 --- a/README.md +++ b/README.md @@ -4,8 +4,8 @@ Landbruksdirektoratet is providing statistics for annual cut at municipality lev in excel sheets, one excel document for each year. https://www.landbruksdirektoratet.no/no/statistikk/skogbruk/tommeravvirkning -SSB provide similar statistics, but at county level, annual resolution and -a bit more lagged publication. +SSB provide similar statistics, but some of it only at county level, annual resolution and +a bit more lagged publication. But longer history. https://www.ssb.no/statbank/list/skogav @@ -16,7 +16,9 @@ This should install it to R: `devtools::install_git('https://gitlab.nibio.no/hbel/vsop.git')` Load dependent packages: -`invisible(lapply(c("magrittr","stringr","dplyr","tibble","lubridate","readxl","PxWebApiData"),library,character.only =T))` +`invisible( + lapply( c("magrittr","stringr","dplyr","tibble","lubridate","readxl","PxWebApiData"), + library,character.only =T))` Demo: `vsop::ssb_skog_omsetning()` diff --git a/data-raw/DATASET.R b/data-raw/DATASET.R new file mode 100644 index 0000000000000000000000000000000000000000..2aebdb69c28a43b709865395a07ae3ddb70b19a9 --- /dev/null +++ b/data-raw/DATASET.R @@ -0,0 +1,152 @@ +## code to prepare `DATASET` dataset goes here + +region_at_time_txtfls = function(filename){ + # function returning the mapping from one region name and code tag to the next according to the SSB region classification + #Fylker: https://www.ssb.no/en/klass/klassifikasjoner/104/versjon/1158/koder + #Kommuner: https://www.ssb.no/en/klass/klassifikasjoner/131 + + # filename = files[1] + #readr::guess_encoding(filename) + datastring = readLines(filename, n=-1L, + encoding = dplyr::pull(readr::guess_encoding(filename)[1,1]), + warn = F)#nchars = 10^6) + headings = unlist(stringr::str_split(datastring[1], "\t")) + print(headings) + datastring = datastring[-1] + + if((length(headings)%% 2) == 0 & length(datastring)>1) { + # Then string should be arranged to pairs of "froms" and "tos" + datastring = stringr::str_remove(datastring, pattern = "\t") + convtable = matrix(data = datastring, ncol = 2, byrow = T) + colnames(convtable) = headings + headingsinv = unlist(lapply(X= str_split(headings, " "), FUN = function(X){paste0(X[2]," ", X[1], " 1")})) + + colnamecandidates = stringr::str_sub( + stringr::str_replace_all( + string = lubridate::ymd(headingsinv), + pattern = "-", + replacement = ""), + start=1, end = 6) + + convtable = dplyr::as_tibble(as.data.frame(convtable, stringsAsFactors=F)) + froms = dplyr::as_tibble( + str_split( + string = dplyr::pull(convtable[,1]), pattern = " - ", n=2, simplify = T)) + colnames(froms) = paste(c("reg_code", "reg_name"), rep(colnamecandidates[1], 2), sep = "_") + + tos = dplyr::as_tibble( + stringr::str_split( + string = dplyr::pull(convtable[,2]), pattern = " - ", n=2, simplify = T)) + colnames(tos) = paste(c("reg_code", "reg_name"), rep(colnamecandidates[2], 2), sep = "_") + + fromstos = dplyr::bind_cols(froms, tos) + } else if((length(headings)%% 2) == 1 & length(datastring)>1) { + # Then it is the starting point, i.e, first array of region units + + convtable = matrix(data = datastring, ncol = 1, byrow = T) + #colnames(convtable) = headings + headingsinv = + unlist(lapply(X= stringr::str_split(headings, " "), + FUN = function(X){ paste0(X[2]," ", X[1], " 1") + })) + colnamecandidates = + stringr::str_sub( + stringr::str_replace_all( + string = lubridate::ymd(headingsinv), + pattern = "-", + replacement = ""), start=1, end = 6) + + convtable = as.data.frame(convtable, stringsAsFactors=F ) + froms = data.frame( + stringr::str_split( + string = convtable[,1], + pattern = " - ", + n=2, + simplify = T), stringsAsFactors = F ) + + colnames(froms) = paste(c("reg_code", "reg_name"), rep(colnamecandidates[1], 2), sep = "_") + + fromstos = dplyr::as_tibble(froms) + + } else if((length(headings)%% 2) == 0 & length(datastring) == 0) { # THen it is an empty update but we still need the "update dates" + + headingsinv = unlist(lapply(X= str_split(headings, " "), FUN = function(X){paste0(X[2]," ", X[1], " 1")})) + colnamecandidates = stringr::str_sub( + stringr::str_replace_all( + string = lubridate::ymd(headingsinv), + pattern = "-", + replacement = ""), + start=1, end = 6) + + froms = data.frame( + matrix( + data = c("a", "b"), + ncol = 2, byrow = T)[NULL, ], + stringsAsFactors = F) + colnames(froms) = + paste(c("reg_code", "reg_name"), rep(colnamecandidates[1], 2), sep = "_") + + tos = data.frame( + matrix(data = c("a", "b"), + ncol = 2, byrow = T)[NULL, ], + stringsAsFactors = F) + colnames(tos) = paste(c("reg_code", "reg_name"), rep(colnamecandidates[2], 2), sep = "_") + + fromstos = dplyr::bind_cols(dplyr::as_tibble(froms), dplyr::as_tibble(tos)) + } else {fromstos = NULL} + + + return(fromstos) +} +regupdated = function(files){ + regiondef = region_at_time_txtfls(filename = files[1]) + + for (i in 2:length(files)){ + print(i) + regupdate = region_at_time_txtfls(filename = files[i]) + ## !! coming left_join: It would be best to find a way to join only by the "reg_code_x" variables but I could not find how to type this :-( + both = dplyr::left_join(regiondef, regupdate) + head(both) + regupnames <- names(both) + regupnamesl <- length(regupnames) + both %>% + dplyr::mutate(., + !!sym(regupnames[regupnamesl-1]) := + dplyr::case_when( + !is.na(!!dplyr::sym(regupnames[regupnamesl-1])) ~ + !!dplyr::sym(regupnames[regupnamesl-1]), + TRUE ~ !!dplyr::sym(regupnames[regupnamesl-3])), + !!sym(regupnames[regupnamesl]) := + dplyr::case_when( + !is.na(!!dplyr::sym(regupnames[regupnamesl])) ~ !!dplyr::sym(regupnames[regupnamesl]), + TRUE ~ !!dplyr::sym(regupnames[regupnamesl-2])) + ) -> regiondef + } + return(regiondef) +} + +no.regiontabell.flk = function(){ + #Fylker: https://www.ssb.no/en/klass/klassifikasjoner/104/versjon/1158/koder + + files <- list.files( path = "./data-raw", pattern = ".txt", full.names = T) %>% + .[which(!stringr::str_detect(., "~"))] %>% + .[which(stringr::str_detect(., "Regindeling_Fylker"))] + inndeling <- regupdated(files = files) + return(inndeling) +} + + +no.regiontabell.kmn = function(){ + #Kommuner: https://www.ssb.no/en/klass/klassifikasjoner/131 + files <- list.files(path = "./data-raw", pattern = ".txt", full.names = T) %>% + .[which(!stringr::str_detect(., "~"))] %>% + .[which(stringr::str_detect(., "Regindeling_Kommuner"))] + inndeling <- regupdated(files = files) + return(inndeling) + +} + +regref_fylke <- no.regiontabell.flk() +regref_kommune <- no.regiontabell.kmn() + +usethis::use_data(regref_kommune, regref_fylke, overwrite = T) diff --git a/data-raw/Regindeling_Fylker_1972_01_status.txt b/data-raw/Regindeling_Fylker_1972_01_status.txt new file mode 100644 index 0000000000000000000000000000000000000000..6dcbdd40be1f6e65455c10a22fe225edfa645f74 --- /dev/null +++ b/data-raw/Regindeling_Fylker_1972_01_status.txt @@ -0,0 +1,21 @@ +januar 1972 +01 - Østfold +02 - Akershus +03 - Oslo +04 - Hedmark +05 - Oppland +06 - Buskerud +07 - Vestfold +08 - Telemark +09 - Aust-Agder +10 - Vest-Agder +11 - Rogaland +12 - Hordaland +14 - Sogn og Fjordane +15 - Møre og Romsdal +16 - Sør-Trøndelag +17 - Nord-Trøndelag +18 - Nordland +19 - Troms +20 - Finnmark Finnmárku +99 - Uoppgitt \ No newline at end of file diff --git a/data-raw/Regindeling_Fylker_2006_7.txt b/data-raw/Regindeling_Fylker_2006_7.txt new file mode 100644 index 0000000000000000000000000000000000000000..e9cf87c2ce869e49a66bf391755cdc7cf61b92dd --- /dev/null +++ b/data-raw/Regindeling_Fylker_2006_7.txt @@ -0,0 +1 @@ +January 1972 July 2006 \ No newline at end of file diff --git a/data-raw/Regindeling_Fylker_2018_1.txt b/data-raw/Regindeling_Fylker_2018_1.txt new file mode 100644 index 0000000000000000000000000000000000000000..b0da95e6f558175873325f97ece0211e44fbe53b --- /dev/null +++ b/data-raw/Regindeling_Fylker_2018_1.txt @@ -0,0 +1,5 @@ +juli 2006 januar 2018 +16 - Sør-Trøndelag +50 - Trøndelag +17 - Nord-Trøndelag +50 - Trøndelag \ No newline at end of file diff --git a/data-raw/Regindeling_Fylker_2020_1.txt b/data-raw/Regindeling_Fylker_2020_1.txt new file mode 100644 index 0000000000000000000000000000000000000000..86bc501f9861d36953805d2785efb86610930c4f --- /dev/null +++ b/data-raw/Regindeling_Fylker_2020_1.txt @@ -0,0 +1,27 @@ +januar 2018 januar 2020 +01 - �stfold +30 - Viken +02 - Akershus +30 - Viken +04 - Hedmark +34 - Innlandet +05 - Oppland +34 - Innlandet +06 - Buskerud +30 - Viken +07 - Vestfold +38 - Vestfold og Telemark +08 - Telemark +38 - Vestfold og Telemark +09 - Aust-Agder +42 - Agder +10 - Vest-Agder +42 - Agder +12 - Hordaland +46 - Vestland +14 - Sogn og Fjordane +46 - Vestland +19 - Troms Romsa +54 - Troms og Finnmark Romsa ja Finnm�rku +20 - Finnmark Finnm�rku +54 - Troms og Finnmark Romsa ja Finnm�rku \ No newline at end of file diff --git a/data-raw/Regindeling_Kommuner_1994_status.txt b/data-raw/Regindeling_Kommuner_1994_status.txt new file mode 100644 index 0000000000000000000000000000000000000000..78e1b9e07e2e7b5e9d3a19c376bddd2ec66b75cf --- /dev/null +++ b/data-raw/Regindeling_Kommuner_1994_status.txt @@ -0,0 +1,437 @@ +januar 1994 +0101 - Halden +0104 - Moss +0105 - Sarpsborg +0106 - Fredrikstad +0111 - Hvaler +0118 - Aremark +0119 - Marker +0121 - Rømskog +0122 - Trøgstad +0123 - Spydeberg +0124 - Askim +0125 - Eidsberg +0127 - Skiptvet +0128 - Rakkestad +0135 - Råde +0136 - Rygge +0137 - Våler +0138 - Hobøl +0211 - Vestby +0213 - Ski +0214 - Ås +0215 - Frogn +0216 - Nesodden +0217 - Oppegård +0219 - Bærum +0220 - Asker +0221 - Aurskog-Høland +0226 - Sørum +0227 - Fet +0228 - Rælingen +0229 - Enebakk +0230 - Lørenskog +0231 - Skedsmo +0233 - Nittedal +0234 - Gjerdrum +0235 - Ullensaker +0236 - Nes +0237 - Eidsvoll +0238 - Nannestad +0239 - Hurdal +0301 - Oslo +0402 - Kongsvinger +0403 - Hamar +0412 - Ringsaker +0415 - Løten +0417 - Stange +0418 - Nord-Odal +0419 - Sør-Odal +0420 - Eidskog +0423 - Grue +0425 - Åsnes +0426 - Våler +0427 - Elverum +0428 - Trysil +0429 - Åmot +0430 - Stor-Elvdal +0432 - Rendalen +0434 - Engerdal +0436 - Tolga +0437 - Tynset +0438 - Alvdal +0439 - Folldal +0441 - Os +0501 - Lillehammer +0502 - Gjøvik +0511 - Dovre +0512 - Lesja +0513 - Skjåk +0514 - Lom +0515 - Vågå +0516 - Nord-Fron +0517 - Sel +0519 - Sør-Fron +0520 - Ringebu +0521 - Øyer +0522 - Gausdal +0528 - Østre Toten +0529 - Vestre Toten +0532 - Jevnaker +0533 - Lunner +0534 - Gran +0536 - Søndre Land +0538 - Nordre Land +0540 - Sør-Aurdal +0541 - Etnedal +0542 - Nord-Aurdal +0543 - Vestre Slidre +0544 - Øystre Slidre +0545 - Vang +0602 - Drammen +0604 - Kongsberg +0605 - Ringerike +0612 - Hole +0615 - Flå +0616 - Nes +0617 - Gol +0618 - Hemsedal +0619 - Ål +0620 - Hol +0621 - Sigdal +0622 - Krødsherad +0623 - Modum +0624 - Øvre Eiker +0625 - Nedre Eiker +0626 - Lier +0627 - Røyken +0628 - Hurum +0631 - Flesberg +0632 - Rollag +0633 - Nore og Uvdal +0701 - Borre +0702 - Holmestrand +0704 - Tønsberg +0706 - Sandefjord +0709 - Larvik +0711 - Svelvik +0713 - Sande +0714 - Hof +0716 - Våle +0718 - Ramnes +0719 - Andebu +0720 - Stokke +0722 - Nøtterøy +0723 - Tjøme +0728 - Lardal +0805 - Porsgrunn +0806 - Skien +0807 - Notodden +0811 - Siljan +0814 - Bamble +0815 - Kragerø +0817 - Drangedal +0819 - Nome +0821 - Bø +0822 - Sauherad +0826 - Tinn +0827 - Hjartdal +0828 - Seljord +0829 - Kviteseid +0830 - Nissedal +0831 - Fyresdal +0833 - Tokke +0834 - Vinje +0901 - Risør +0904 - Grimstad +0906 - Arendal +0911 - Gjerstad +0912 - Vegårshei +0914 - Tvedestrand +0919 - Froland +0926 - Lillesand +0928 - Birkenes +0929 - Åmli +0935 - Iveland +0937 - Evje og Hornnes +0938 - Bygland +0940 - Valle +0941 - Bykle +1001 - Kristiansand +1002 - Mandal +1003 - Farsund +1004 - Flekkefjord +1014 - Vennesla +1017 - Songdalen +1018 - Søgne +1021 - Marnardal +1026 - Åseral +1027 - Audnedal +1029 - Lindesnes +1032 - Lyngdal +1034 - Hægebostad +1037 - Kvinesdal +1046 - Sirdal +1101 - Eigersund +1102 - Sandnes +1103 - Stavanger +1106 - Haugesund +1111 - Sokndal +1112 - Lund +1114 - Bjerkreim +1119 - Hå +1120 - Klepp +1121 - Time +1122 - Gjesdal +1124 - Sola +1127 - Randaberg +1129 - Forsand +1130 - Strand +1133 - Hjelmeland +1134 - Suldal +1135 - Sauda +1141 - Finnøy +1142 - Rennesøy +1144 - Kvitsøy +1145 - Bokn +1146 - Tysvær +1149 - Karmøy +1151 - Utsira +1154 - Vindafjord +1201 - Bergen +1211 - Etne +1214 - Ølen +1216 - Sveio +1219 - Bømlo +1221 - Stord +1222 - Fitjar +1223 - Tysnes +1224 - Kvinnherad +1227 - Jondal +1228 - Odda +1231 - Ullensvang +1232 - Eidfjord +1233 - Ulvik +1234 - Granvin +1235 - Voss +1238 - Kvam +1241 - Fusa +1242 - Samnanger +1243 - Os +1244 - Austevoll +1245 - Sund +1246 - Fjell +1247 - Askøy +1251 - Vaksdal +1252 - Modalen +1253 - Osterøy +1256 - Meland +1259 - Øygarden +1260 - Radøy +1263 - Lindås +1264 - Austrheim +1265 - Fedje +1266 - Masfjorden +1401 - Flora +1411 - Gulen +1412 - Solund +1413 - Hyllestad +1416 - Høyanger +1417 - Vik +1418 - Balestrand +1419 - Leikanger +1420 - Sogndal +1421 - Aurland +1422 - Lærdal +1424 - Årdal +1426 - Luster +1428 - Askvoll +1429 - Fjaler +1430 - Gaular +1431 - Jølster +1432 - Førde +1433 - Naustdal +1438 - Bremanger +1439 - Vågsøy +1441 - Selje +1443 - Eid +1444 - Hornindal +1445 - Gloppen +1449 - Stryn +1502 - Molde +1503 - Kristiansund +1504 - Ålesund +1511 - Vanylven +1514 - Sande +1515 - Herøy +1516 - Ulstein +1517 - Hareid +1519 - Volda +1520 - Ørsta +1523 - Ørskog +1524 - Norddal +1525 - Stranda +1526 - Stordal +1528 - Sykkylven +1529 - Skodje +1531 - Sula +1532 - Giske +1534 - Haram +1535 - Vestnes +1539 - Rauma +1543 - Nesset +1545 - Midsund +1546 - Sandøy +1547 - Aukra +1548 - Fræna +1551 - Eide +1554 - Averøy +1556 - Frei +1557 - Gjemnes +1560 - Tingvoll +1563 - Sunndal +1566 - Surnadal +1567 - Rindal +1569 - Aure +1571 - Halsa +1572 - Tustna +1573 - Smøla +1601 - Trondheim +1612 - Hemne +1613 - Snillfjord +1617 - Hitra +1620 - Frøya +1621 - Ørland +1622 - Agdenes +1624 - Rissa +1627 - Bjugn +1630 - Åfjord +1632 - Roan +1633 - Osen +1634 - Oppdal +1635 - Rennebu +1636 - Meldal +1638 - Orkdal +1640 - Røros +1644 - Holtålen +1648 - Midtre Gauldal +1653 - Melhus +1657 - Skaun +1662 - Klæbu +1663 - Malvik +1664 - Selbu +1665 - Tydal +1702 - Steinkjer +1703 - Namsos +1711 - Meråker +1714 - Stjørdal +1717 - Frosta +1718 - Leksvik +1719 - Levanger +1721 - Verdal +1723 - Mosvik +1724 - Verran +1725 - Namdalseid +1729 - Inderøy +1736 - Snåsa +1738 - Lierne +1739 - Røyrvik +1740 - Namsskogan +1742 - Grong +1743 - Høylandet +1744 - Overhalla +1748 - Fosnes +1749 - Flatanger +1750 - Vikna +1751 - Nærøy +1755 - Leka +1804 - Bodø +1805 - Narvik +1811 - Bindal +1812 - Sømna +1813 - Brønnøy +1815 - Vega +1816 - Vevelstad +1818 - Herøy +1820 - Alstahaug +1822 - Leirfjord +1824 - Vefsn +1825 - Grane +1826 - Hattfjelldal +1827 - Dønna +1828 - Nesna +1832 - Hemnes +1833 - Rana +1834 - Lurøy +1835 - Træna +1836 - Rødøy +1837 - Meløy +1838 - Gildeskål +1839 - Beiarn +1840 - Saltdal +1841 - Fauske +1842 - Skjerstad +1845 - Sørfold +1848 - Steigen +1849 - Hamarøy +1850 - Tysfjord +1851 - Lødingen +1852 - Tjeldsund +1853 - Evenes +1854 - Ballangen +1856 - Røst +1857 - Værøy +1859 - Flakstad +1860 - Vestvågøy +1865 - Vågan +1866 - Hadsel +1867 - Bø +1868 - Øksnes +1870 - Sortland +1871 - Andøy +1874 - Moskenes +1901 - Harstad +1902 - Tromsø +1911 - Kvæfjord +1913 - Skånland +1915 - Bjarkøy +1917 - Ibestad +1919 - Gratangen +1920 - Lavangen +1922 - Bardu +1923 - Salangen +1924 - Målselv +1925 - Sørreisa +1926 - Dyrøy +1927 - Tranøy +1928 - Torsken +1929 - Berg +1931 - Lenvik +1933 - Balsfjord +1936 - Karlsøy +1938 - Lyngen +1939 - Storfjord +1940 - Kåfjord +1941 - Skjervøy +1942 - Nordreisa +1943 - Kvænangen +2002 - Vardø +2003 - Vadsø +2004 - Hammerfest +2011 - Kautokeino +2012 - Alta +2014 - Loppa +2015 - Hasvik +2017 - Kvalsund +2018 - Måsøy +2019 - Nordkapp +2020 - Porsanger +2021 - Kárásjohka - Karasjok +2022 - Lebesby +2023 - Gamvik +2024 - Berlevåg +2025 - Deatnu - Tana +2027 - Unjárga - Nesseby +2028 - Båtsfjord +2030 - Sør-Varanger +9999 - Unknown diff --git a/data-raw/Regindeling_Kommuner_2002_01.txt b/data-raw/Regindeling_Kommuner_2002_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..1d27b79c85d8d702f7dccadee586f45c837bfca4 --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2002_01.txt @@ -0,0 +1,7 @@ +Januar 1994 Januar 2002 +0716 - Våle +0716 - Re +0718 - Ramnes +0716 - Re +1214 - Ølen +1159 - Ølen diff --git a/data-raw/Regindeling_Kommuner_2002_06.txt b/data-raw/Regindeling_Kommuner_2002_06.txt new file mode 100644 index 0000000000000000000000000000000000000000..c1716ce8358bb110ac05d342635dc72521061cb2 --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2002_06.txt @@ -0,0 +1,3 @@ +Januar 2002 Juni 2002 +0701 - Borre +0701 - Horten diff --git a/data-raw/Regindeling_Kommuner_2004_01.txt b/data-raw/Regindeling_Kommuner_2004_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..fe7e63b3f882ca7a1c725727435ad69b81d405a2 --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2004_01.txt @@ -0,0 +1,3 @@ +juni 2002 januar 2004 +2020 - Porsanger +2020 - Porsanger diff --git a/data-raw/Regindeling_Kommuner_2005_01.txt b/data-raw/Regindeling_Kommuner_2005_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..14f2b488824b94233a1d726688876231fe31b388 --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2005_01.txt @@ -0,0 +1,5 @@ +januar 2004 januar 2005 +1804 - Bodø +1804 - Bodø +1842 - Skjerstad +1804 - Bodø diff --git a/data-raw/Regindeling_Kommuner_2006_01.txt b/data-raw/Regindeling_Kommuner_2006_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..6b1b29d5b0c493170f7044a47999774ccb6c160a --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2006_01.txt @@ -0,0 +1,9 @@ +januar 2005 januar 2006 +1154 - Vindafjord +1160 - Vindafjord +1159 - Ølen +1160 - Vindafjord +1569 - Aure +1576 - Aure +1572 - Tustna +1576 - Aure diff --git a/data-raw/Regindeling_Kommuner_2008_01.txt b/data-raw/Regindeling_Kommuner_2008_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..91b98bd293ad4e48aa86498857d7444a362541bd --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2008_01.txt @@ -0,0 +1,5 @@ +januar 2006 januar 2008 +1503 - Kristiansund +1505 - Kristiansund +1556 - Frei +1505 - Kristiansund diff --git a/data-raw/Regindeling_Kommuner_2012_01.txt b/data-raw/Regindeling_Kommuner_2012_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..49a0b97699186db3951063068d7d57d997799238 --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2012_01.txt @@ -0,0 +1,5 @@ +januar 2008 januar 2012 +1723 - Mosvik +1756 - Inderøy +1729 - Inderøy +1756 - Inderøy diff --git a/data-raw/Regindeling_Kommuner_2013_01.txt b/data-raw/Regindeling_Kommuner_2013_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..f288f2790c43245b454b55a147bcc9fb294c9dc0 --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2013_01.txt @@ -0,0 +1,11 @@ +januar 2012 januar 2013 +1736 - Snåsa +1736 - Snåsa +1849 - Hamarøy +1849 - Hamarøy +1850 - Tysfjord +1850 - Tysfjord +1901 - Harstad +1903 - Harstad +1915 - Bjarkøy +1903 - Harstad diff --git a/data-raw/Regindeling_Kommuner_2017_01.txt b/data-raw/Regindeling_Kommuner_2017_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..44266ef9d3f05c0b2bc71646cd8cdab882a71b52 --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2017_01.txt @@ -0,0 +1,7 @@ +Januar 2013 Januar 2017 +0706 - Sandefjord +0710 - Sandefjord +0719 - Andebu +0710 - Sandefjord +0720 - Stokke +0710 - Sandefjord diff --git a/data-raw/Regindeling_Kommuner_2018_01.txt b/data-raw/Regindeling_Kommuner_2018_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..1bab60f1fe39ce096fb2205318d93f5a059f4ccd --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2018_01.txt @@ -0,0 +1,109 @@ +Januar 2017 Mai 2018 +0702 - Holmestrand +0715 - Holmestrand +0709 - Larvik +0712 - Larvik +0714 - Hof +0715 - Holmestrand +0722 - Nøtterøy +0729 - Færder +0723 - Tjøme +0729 - Færder +0728 - Lardal +0712 - Larvik +1601 - Trondheim +5001 - Trondheim +1612 - Hemne +5011 - Hemne +1613 - Snillfjord +5012 - Snillfjord +1617 - Hitra +5013 - Hitra +1620 - Frøya +5014 - Frøya +1621 - Ørland +5015 - Ørland +1622 - Agdenes +5016 - Agdenes +1624 - Rissa +5054 - Indre Fosen +1627 - Bjugn +5017 - Bjugn +1630 - Åfjord +5018 - Åfjord +1632 - Roan +5019 - Roan +1633 - Osen +5020 - Osen +1634 - Oppdal +5021 - Oppdal +1635 - Rennebu +5022 - Rennebu +1636 - Meldal +5023 - Meldal +1638 - Orkdal +5024 - Orkdal +1640 - Røros +5025 - Røros +1644 - Holtålen +5026 - Holtålen +1648 - Midtre Gauldal +5027 - Midtre Gauldal +1653 - Melhus +5028 - Melhus +1657 - Skaun +5029 - Skaun +1662 - Klæbu +5030 - Klæbu +1663 - Malvik +5031 - Malvik +1664 - Selbu +5032 - Selbu +1665 - Tydal +5033 - Tydal +1702 - Steinkjer +5004 - Steinkjer +1703 - Namsos +5005 - Namsos +1711 - Meråker +5034 - Meråker +1714 - Stjørdal +5035 - Stjørdal +1717 - Frosta +5036 - Frosta +1718 - Leksvik +5054 - Indre Fosen +1719 - Levanger +5037 - Levanger +1721 - Verdal +5038 - Verdal +1724 - Verran +5039 - Verran +1725 - Namdalseid +5040 - Namdalseid +1736 - Snåase Snåsa +5041 - Snåase - Snåsa +1738 - Lierne +5042 - Lierne +1739 - Røyrvik +5043 - Raarvihke - Røyrvik +1740 - Namsskogan +5044 - Namsskogan +1742 - Grong +5045 - Grong +1743 - Høylandet +5046 - Høylandet +1744 - Overhalla +5047 - Overhalla +1748 - Fosnes +5048 - Fosnes +1749 - Flatanger +5049 - Flatanger +1750 - Vikna +5050 - Vikna +1751 - Nærøy +5051 - Nærøy +1755 - Leka +5052 - Leka +1756 - Inderøy +5053 - Inderøy \ No newline at end of file diff --git a/data-raw/Regindeling_Kommuner_2019_01.txt b/data-raw/Regindeling_Kommuner_2019_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..3e04ac6daaf50aeae79f224afc681fe2e3f57e06 --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2019_01.txt @@ -0,0 +1,3 @@ +Mai 2018 January 2019 +1567 - Rindal +5061 - Rindal \ No newline at end of file diff --git a/data-raw/Regindeling_Kommuner_2020_01.txt b/data-raw/Regindeling_Kommuner_2020_01.txt new file mode 100644 index 0000000000000000000000000000000000000000..2882c904baf1bff4c849f580b0e47269cd9a5deb --- /dev/null +++ b/data-raw/Regindeling_Kommuner_2020_01.txt @@ -0,0 +1,619 @@ +January 2019 January 2020 +0101 - Halden +3001 - Halden +0104 - Moss +3002 - Moss +0105 - Sarpsborg +3003 - Sarpsborg +0106 - Fredrikstad +3004 - Fredrikstad +0111 - Hvaler +3011 - Hvaler +0118 - Aremark +3012 - Aremark +0119 - Marker +3013 - Marker +0121 - Rømskog +3026 - Aurskog-Høland +0122 - Trøgstad +3014 - Indre Østfold +0123 - Spydeberg +3014 - Indre Østfold +0124 - Askim +3014 - Indre Østfold +0125 - Eidsberg +3014 - Indre Østfold +0127 - Skiptvet +3015 - Skiptvet +0128 - Rakkestad +3016 - Rakkestad +0135 - Råde +3017 - Råde +0136 - Rygge +3002 - Moss +0137 - Våler +3018 - Våler (Viken) +0138 - Hobøl +3014 - Indre Østfold +0211 - Vestby +3019 - Vestby +0213 - Ski +3020 - Nordre Follo +0214 - Ås +3021 - Ås +0215 - Frogn +3022 - Frogn +0216 - Nesodden +3023 - Nesodden +0217 - Oppegård +3020 - Nordre Follo +0219 - Bærum +3024 - Bærum +0220 - Asker +3025 - Asker +0221 - Aurskog-Høland +3026 - Aurskog-Høland +0226 - Sørum +3030 - Lillestrøm +0227 - Fet +3030 - Lillestrøm +0228 - Rælingen +3027 - Rælingen +0229 - Enebakk +3028 - Enebakk +0230 - Lørenskog +3029 - Lørenskog +0231 - Skedsmo +3030 - Lillestrøm +0233 - Nittedal +3031 - Nittedal +0234 - Gjerdrum +3032 - Gjerdrum +0235 - Ullensaker +3033 - Ullensaker +0236 - Nes +3034 - Nes +0237 - Eidsvoll +3035 - Eidsvoll +0238 - Nannestad +3036 - Nannestad +0239 - Hurdal +3037 - Hurdal +0402 - Kongsvinger +3401 - Kongsvinger +0403 - Hamar +3403 - Hamar +0412 - Ringsaker +3411 - Ringsaker +0415 - Løten +3412 - Løten +0417 - Stange +3413 - Stange +0418 - Nord-Odal +3414 - Nord-Odal +0419 - Sør-Odal +3415 - Sør-Odal +0420 - Eidskog +3416 - Eidskog +0423 - Grue +3417 - Grue +0425 - Åsnes +3418 - Åsnes +0426 - Våler +3419 - Våler (Hedmark) +0427 - Elverum +3420 - Elverum +0428 - Trysil +3421 - Trysil +0429 - Åmot +3422 - Åmot +0430 - Stor-Elvdal +3423 - Stor-Elvdal +0432 - Rendalen +3424 - Rendalen +0434 - Engerdal +3425 - Engerdal +0436 - Tolga +3426 - Tolga +0437 - Tynset +3427 - Tynset +0438 - Alvdal +3428 - Alvdal +0439 - Folldal +3429 - Folldal +0441 - Os +3430 - Os +0501 - Lillehammer +3405 - Lillehammer +0502 - Gjøvik +3407 - Gjøvik +0511 - Dovre +3431 - Dovre +0512 - Lesja +3432 - Lesja +0513 - Skjåk +3433 - Skjåk +0514 - Lom +3434 - Lom +0515 - Vågå +3435 - Vågå +0516 - Nord-Fron +3436 - Nord-Fron +0517 - Sel +3437 - Sel +0519 - Sør-Fron +3438 - Sør-Fron +0520 - Ringebu +3439 - Ringebu +0521 - Øyer +3440 - Øyer +0522 - Gausdal +3441 - Gausdal +0528 - Østre Toten +3442 - Østre Toten +0529 - Vestre Toten +3443 - Vestre Toten +0532 - Jevnaker +3053 - Jevnaker +0533 - Lunner +3054 - Lunner +0534 - Gran +3446 - Gran +0536 - Søndre Land +3447 - Søndre Land +0538 - Nordre Land +3448 - Nordre Land +0540 - Sør-Aurdal +3449 - Sør-Aurdal +0541 - Etnedal +3450 - Etnedal +0542 - Nord-Aurdal +3451 - Nord-Aurdal +0543 - Vestre Slidre +3452 - Vestre Slidre +0544 - Øystre Slidre +3453 - Øystre Slidre +0545 - Vang +3454 - Vang +0602 - Drammen +3005 - Drammen +0604 - Kongsberg +3006 - Kongsberg +0605 - Ringerike +3007 - Ringerike +0612 - Hole +3038 - Hole +0615 - Flå +3039 - Flå +0616 - Nes +3040 - Nesbyen +0617 - Gol +3041 - Gol +0618 - Hemsedal +3042 - Hemsedal +0619 - Ål +3043 - Ål +0620 - Hol +3044 - Hol +0621 - Sigdal +3045 - Sigdal +0622 - Krødsherad +3046 - Krødsherad +0623 - Modum +3047 - Modum +0624 - Øvre Eiker +3048 - Øvre Eiker +0625 - Nedre Eiker +3005 - Drammen +0626 - Lier +3049 - Lier +0627 - Røyken +3025 - Asker +0628 - Hurum +3025 - Asker +0631 - Flesberg +3050 - Flesberg +0632 - Rollag +3051 - Rollag +0633 - Nore og Uvdal +3052 - Nore og Uvdal +0701 - Horten +3801 - Horten +0704 - Tønsberg +3803 - Tønsberg +0710 - Sandefjord +3804 - Sandefjord +0711 - Svelvik +3005 - Drammen +0712 - Larvik +3805 - Larvik +0713 - Sande +3802 - Holmestrand +0715 - Holmestrand +3802 - Holmestrand +0716 - Re +3803 - Tønsberg +0729 - Færder +3811 - Færder +0805 - Porsgrunn +3806 - Porsgrunn +0806 - Skien +3807 - Skien +0807 - Notodden +3808 - Notodden +0811 - Siljan +3812 - Siljan +0814 - Bamble +3813 - Bamble +0815 - Kragerø +3814 - Kragerø +0817 - Drangedal +3815 - Drangedal +0819 - Nome +3816 - Nome +0821 - Bø +3817 - Midt-Telemark +0822 - Sauherad +3817 - Midt-Telemark +0826 - Tinn +3818 - Tinn +0827 - Hjartdal +3819 - Hjartdal +0828 - Seljord +3820 - Seljord +0829 - Kviteseid +3821 - Kviteseid +0830 - Nissedal +3822 - Nissedal +0831 - Fyresdal +3823 - Fyresdal +0833 - Tokke +3824 - Tokke +0834 - Vinje +3825 - Vinje +0901 - Risør +4201 - Risør +0904 - Grimstad +4202 - Grimstad +0906 - Arendal +4203 - Arendal +0911 - Gjerstad +4211 - Gjerstad +0912 - Vegårshei +4212 - Vegårshei +0914 - Tvedestrand +4213 - Tvedestrand +0919 - Froland +4214 - Froland +0926 - Lillesand +4215 - Lillesand +0928 - Birkenes +4216 - Birkenes +0929 - Åmli +4217 - Åmli +0935 - Iveland +4218 - Iveland +0937 - Evje og Hornnes +4219 - Evje og Hornnes +0938 - Bygland +4220 - Bygland +0940 - Valle +4221 - Valle +0941 - Bykle +4222 - Bykle +1001 - Kristiansand +4204 - Kristiansand +1002 - Mandal +4205 - Lindesnes +1003 - Farsund +4206 - Farsund +1004 - Flekkefjord +4207 - Flekkefjord +1014 - Vennesla +4223 - Vennesla +1017 - Songdalen +4204 - Kristiansand +1018 - Søgne +4204 - Kristiansand +1021 - Marnardal +4205 - Lindesnes +1026 - Åseral +4224 - Åseral +1027 - Audnedal +4225 - Lyngdal +1029 - Lindesnes +4205 - Lindesnes +1032 - Lyngdal +4225 - Lyngdal +1034 - Hægebostad +4226 - Hægebostad +1037 - Kvinesdal +4227 - Kvinesdal +1046 - Sirdal +4228 - Sirdal +1102 - Sandnes +1108 - Sandnes +1129 - Forsand +1108 - Sandnes +1141 - Finnøy +1103 - Stavanger +1142 - Rennesøy +1103 - Stavanger +1201 - Bergen +4601 - Bergen +1211 - Etne +4611 - Etne +1216 - Sveio +4612 - Sveio +1219 - Bømlo +4613 - Bømlo +1221 - Stord +4614 - Stord +1222 - Fitjar +4615 - Fitjar +1223 - Tysnes +4616 - Tysnes +1224 - Kvinnherad +4617 - Kvinnherad +1227 - Jondal +4618 - Ullensvang +1228 - Odda +4618 - Ullensvang +1231 - Ullensvang +4618 - Ullensvang +1232 - Eidfjord +4619 - Eidfjord +1233 - Ulvik +4620 - Ulvik +1234 - Granvin +4621 - Voss +1235 - Voss +4621 - Voss +1238 - Kvam +4622 - Kvam +1241 - Fusa +4624 - Bjørnafjorden +1242 - Samnanger +4623 - Samnanger +1243 - Os +4624 - Bjørnafjorden +1244 - Austevoll +4625 - Austevoll +1245 - Sund +4626 - Øygarden +1246 - Fjell +4626 - Øygarden +1247 - Askøy +4627 - Askøy +1251 - Vaksdal +4628 - Vaksdal +1252 - Modalen +4629 - Modalen +1253 - Osterøy +4630 - Osterøy +1256 - Meland +4631 - Alver +1259 - Øygarden +4626 - Øygarden +1260 - Radøy +4631 - Alver +1263 - Lindås +4631 - Alver +1264 - Austrheim +4632 - Austrheim +1265 - Fedje +4633 - Fedje +1266 - Masfjorden +4634 - Masfjorden +1401 - Flora +4602 - Kinn +1411 - Gulen +4635 - Gulen +1412 - Solund +4636 - Solund +1413 - Hyllestad +4637 - Hyllestad +1416 - Høyanger +4638 - Høyanger +1417 - Vik +4639 - Vik +1418 - Balestrand +4640 - Sogndal +1419 - Leikanger +4640 - Sogndal +1420 - Sogndal +4640 - Sogndal +1421 - Aurland +4641 - Aurland +1422 - Lærdal +4642 - Lærdal +1424 - Årdal +4643 - Årdal +1426 - Luster +4644 - Luster +1428 - Askvoll +4645 - Askvoll +1429 - Fjaler +4646 - Fjaler +1430 - Gaular +4647 - Sunnfjord +1431 - Jølster +4647 - Sunnfjord +1432 - Førde +4647 - Sunnfjord +1433 - Naustdal +4647 - Sunnfjord +1438 - Bremanger +4648 - Bremanger +1439 - Vågsøy +4602 - Kinn +1441 - Selje +4649 - Stad +1443 - Eid +4649 - Stad +1444 - Hornindal +1577 - Volda +1445 - Gloppen +4650 - Gloppen +1449 - Stryn +4651 - Stryn +1502 - Molde +1506 - Molde +1504 - Ålesund +1507 - Ålesund +1519 - Volda +1577 - Volda +1523 - Ørskog +1507 - Ålesund +1524 - Norddal +1578 - Fjord +1526 - Stordal +1578 - Fjord +1529 - Skodje +1507 - Ålesund +1534 - Haram +1507 - Ålesund +1543 - Nesset +1506 - Molde +1545 - Midsund +1506 - Molde +1546 - Sandøy +1507 - Ålesund +1548 - Fræna +1579 - Hustadvika +1551 - Eide +1579 - Hustadvika +1571 - Halsa +5055 - Heim +1805 - Narvik +1806 - Narvik +1849 - Hamarøy - Hábmer +1875 - Hamarøy +1850 - Divtasvuodna - Tysfjord +1806 - Narvik +1852 - Tjeldsund +5412 - Tjeldsund +1854 - Ballangen +1806 - Narvik +1902 - Tromsø +5401 - Tromsø +1903 - Harstad - Hárstták +5402 - Harstad +1911 - Kvæfjord +5411 - Kvæfjord +1913 - Skånland +5412 - Tjeldsund +1917 - Ibestad +5413 - Ibestad +1919 - Gratangen +5414 - Gratangen +1920 - Loabák - Lavangen +5415 - Loabák - Lavangen +1922 - Bardu +5416 - Bardu +1923 - Salangen +5417 - Salangen +1924 - Målselv +5418 - Målselv +1925 - Sørreisa +5419 - Sørreisa +1926 - Dyrøy +5420 - Dyrøy +1927 - Tranøy +5421 - Senja +1928 - Torsken +5421 - Senja +1929 - Berg +5421 - Senja +1931 - Lenvik +5421 - Senja +1933 - Balsfjord +5422 - Balsfjord +1936 - Karlsøy +5423 - Karlsøy +1938 - Lyngen +5424 - Lyngen +1939 - Storfjord - Omasvuotna - Omasvuono +5425 - Storfjord - Omasvuotna - Omasvuono +1940 - Gáivuotna - Kåfjord - Kaivuono +5426 - Gáivuotna - Kåfjord - Kaivuono +1941 - Skjervøy +5427 - Skjervøy +1942 - Nordreisa - Ráisa - Raisi +5428 - Nordreisa +1943 - Kvænangen +5429 - Kvænangen +2002 - Vardø +5404 - Vardø +2003 - Vadsø +5405 - Vadsø +2004 - Hammerfest +5406 - Hammerfest +2011 - Guovdageaidnu - Kautokeino +5430 - Guovdageaidnu-Kautokeino +2012 - Alta +5403 - Alta +2014 - Loppa +5432 - Loppa +2015 - Hasvik +5433 - Hasvik +2017 - Kvalsund +5406 - Hammerfest +2018 - Måsøy +5434 - Måsøy +2019 - Nordkapp +5435 - Nordkapp +2020 - Porsanger - Porsángu - Porsanki +5436 - Porsanger - Porsáŋgu - Porsanki +2021 - Kárášjohka - Karasjok +5437 - Kárášjohka-Karasjok +2022 - Lebesby +5438 - Lebesby +2023 - Gamvik +5439 - Gamvik +2024 - Berlevåg +5440 - Berlevåg +2025 - Deatnu - Tana +5441 - Deatnu-Tana +2027 - Unjárga - Nesseby +5442 - Unjárga-Nesseby +2028 - Båtsfjord +5443 - Båtsfjord +2030 - Sør-Varanger +5444 - Sør-Varanger +5004 - Steinkjer +5006 - Steinkjer +5005 - Namsos +5007 - Namsos +5011 - Hemne +5055 - Heim +5012 - Snillfjord +5055 - Heim +5013 - Hitra +5056 - Hitra +5015 - Ørland +5057 - Ørland +5016 - Agdenes +5059 - Orkland +5017 - Bjugn +5057 - Ørland +5018 - Åfjord +5058 - Åfjord +5019 - Roan +5058 - Åfjord +5023 - Meldal +5059 - Orkland +5024 - Orkdal +5059 - Orkland +5030 - Klæbu +5001 - Trondheim +5039 - Verran +5006 - Steinkjer +5040 - Namdalseid +5007 - Namsos +5048 - Fosnes +5007 - Namsos +5050 - Vikna +5060 - Nærøysund +5051 - Nærøy +5060 - Nærøysund \ No newline at end of file diff --git a/data/regref_fylke.rda b/data/regref_fylke.rda new file mode 100644 index 0000000000000000000000000000000000000000..f72068a71e885eae9c7d29c8fcbfbdc2f8fc0f92 Binary files /dev/null and b/data/regref_fylke.rda differ diff --git a/data/regref_kommune.rda b/data/regref_kommune.rda new file mode 100644 index 0000000000000000000000000000000000000000..9f0de68a9d17baed66c1881879da631583d81632 Binary files /dev/null and b/data/regref_kommune.rda differ diff --git a/inst/extdata/SSB_t03794_bruttoverdi_fylke2020_1996_2018.json b/inst/extdata/SSB_t03794_bruttoverdi_fylke2020_1996_2018.json deleted file mode 100644 index 8e7edbd2eb433335996bbf775a07acc56b20ac54..0000000000000000000000000000000000000000 --- a/inst/extdata/SSB_t03794_bruttoverdi_fylke2020_1996_2018.json +++ /dev/null @@ -1 +0,0 @@ -{"dataset":{"status":{"15":"..","82":"..","85":"..","88":"..","89":"..","90":"..","105":"..","106":"..","110":"..","111":"..","128":"..","129":"..","130":"..","131":"..","132":"..","133":"..","134":"..","135":"..","136":"..","137":"..","151":"..","152":"..","153":"..","154":"..","155":"..","156":"..","157":"..","158":"..","159":"..","160":"..","174":"..","175":"..","176":"..","177":"..","178":"..","179":"..","180":"..","181":"..","182":"..","183":"..","197":"..","198":"..","199":"..","200":"..","201":"..","202":"..","203":"..","204":"..","205":"..","206":"..","220":"..","221":"..","222":"..","223":"..","224":"..","225":"..","226":"..","227":"..","228":"..","229":"..","243":"..","244":"..","245":"..","246":"..","247":"..","248":"..","249":"..","250":"..","251":"..","252":".."},"dimension":{"Region":{"label":"region","category":{"index":{"F-30":0,"F-03":1,"F-34":2,"F-38":3,"F-42":4,"F-11":5,"F-46":6,"F-15":7,"F-50":8,"F-18":9,"F-54":10},"label":{"F-30":"Viken","F-03":"Oslo","F-34":"Innlandet","F-38":"Vestfold og Telemark","F-42":"Agder","F-11":"Rogaland","F-46":"Vestland","F-15":"Møre og Romsdal","F-50":"Trøndelag","F-18":"Nordland","F-54":"Troms og Finnmark"}},"link":{"describedby":[{"extension":{"Region":"urn:ssb:classification:klass:104 urn:ssb:classification:klass:131"}}]}},"ContentsCode":{"label":"statistikkvariabel","category":{"index":{"Bruttoverdi":0},"label":{"Bruttoverdi":"Bruttoverdi"},"unit":{"Bruttoverdi":{"base":"1000 kr","decimals":0}}},"link":{"describedby":[{"extension":{"Bruttoverdi":"urn:ssb:conceptvariable:vardok:1327"}}]}},"Tid":{"label":"år","category":{"index":{"1996":0,"1997":1,"1998":2,"1999":3,"2000":4,"2001":5,"2002":6,"2003":7,"2004":8,"2005":9,"2006":10,"2007":11,"2008":12,"2009":13,"2010":14,"2011":15,"2012":16,"2013":17,"2014":18,"2015":19,"2016":20,"2017":21,"2018":22},"label":{"1996":"1996","1997":"1997","1998":"1998","1999":"1999","2000":"2000","2001":"2001","2002":"2002","2003":"2003","2004":"2004","2005":"2005","2006":"2006","2007":"2007","2008":"2008","2009":"2009","2010":"2010","2011":"2011","2012":"2012","2013":"2013","2014":"2014","2015":"2015","2016":"2016","2017":"2017","2018":"2018"}}},"id":["Region","ContentsCode","Tid"],"size":[11,1,23],"role":{"geo":["Region"],"metric":["ContentsCode"],"time":["Tid"]}},"label":"03794: Bruttoverdi. Avvirkning for salg (1 000 kr), etter region, statistikkvariabel og år","source":"Statistisk sentralbyrå","updated":"2019-08-30T06:00:00Z","value":[688437,731740,651045,677894,603625,659631,624128,595754,663740,749339,636062,808231,761229,529227,833704,null,703196,639206,892052,916385,884125,978716,1202281,18031,16181,11634,14363,10599,10581,13318,9827,10998,9328,6592,9388,9082,12543,9742,10362,11987,11924,15697,12375,14240,6480,22796,1031702,1164366,1074636,1110909,1042701,1093846,971295,910009,1019639,1243145,954002,1353628,1214096,883165,1241378,1333493,1328547,1260879,1464108,1406322,1386140,1530368,1822837,303489,336942,328252,325428,320377,304536,252384,217575,244935,273207,256305,353113,343620,null,317882,317311,null,209153,290411,null,null,null,408620,187554,198136,172644,178957,173353,171428,140135,145697,146225,165228,124163,146415,170487,null,null,192443,170267,161628,null,null,215139,244881,300708,17987,16136,7989,14116,14826,15284,13526,17786,19170,17988,15843,16887,30349,null,null,null,null,null,null,null,null,null,null,58038,41017,30167,41887,38627,41920,38134,39159,46038,42276,26546,37388,44297,null,null,null,null,null,null,null,null,null,null,29994,25276,18971,22320,24511,25556,22524,23599,21794,22965,16862,24157,28387,null,null,null,null,null,null,null,null,null,null,308876,288172,271344,280521,273755,273763,229748,208754,209499,243733,243605,283693,286044,null,null,null,null,null,null,null,null,null,null,36398,41653,33596,51142,50733,65955,50463,46671,51233,45638,37045,44800,46249,null,null,null,null,null,null,null,null,null,null,28722,18157,8145,22520,14694,13082,15178,15651,15537,16066,1379,845,344,null,null,null,null,null,null,null,null,null,null]}} \ No newline at end of file diff --git a/man/regnavn.at.ref.yr.Rd b/man/regnavn.at.ref.yr.Rd new file mode 100644 index 0000000000000000000000000000000000000000..8f062f2b2894c01830ceb72a42df86eaf55ce055 --- /dev/null +++ b/man/regnavn.at.ref.yr.Rd @@ -0,0 +1,24 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/no_regioninndeling.R +\name{regnavn.at.ref.yr} +\alias{regnavn.at.ref.yr} +\title{Region navn og region kode for gitt år} +\usage{ +regnavn.at.ref.yr(regionstat, ref.yr = year(now()), reg_level = "fylke") +} +\arguments{ +\item{reg_level}{is the region level in the regionstat ("fylke" | kommune")} +} +\value{ +tibble having the regional statistics including the regional +names and codes for the reference year in question +} +\description{ +Denne funksjonen tar regionkoder og regionnavn fra en regional statistikk, +tar inn tabell som viser historiske endringer i regional inndeling av Norge +og gjør om til riktige koder og navn for et gitt referanseår (ref.yr) +Funksjonen fungerer for fylkesnivå inkludert landet ELLER for kommunenivå. +} +\examples{ +regnavn.at.ref.yr(regionstat = t12750(), ref.yr = 2020 ) \%>\% glimpse() +} diff --git a/man/ssb_skog_omsetning.Rd b/man/ssb_skog_omsetning.Rd deleted file mode 100644 index 60f820631520282bb18d6ad0b4c36517a0dee7fa..0000000000000000000000000000000000000000 --- a/man/ssb_skog_omsetning.Rd +++ /dev/null @@ -1,18 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/ssb_skogsavvirkning.R -\name{ssb_skog_omsetning} -\alias{ssb_skog_omsetning} -\title{SSB skogsavvirkning for salg: omsetning} -\usage{ -ssb_skog_omsetning() -} -\value{ -en tibble med pris og volum fordelt på fylker og sortimentgrupper og år. -} -\description{ -Denne henter tabellene for prishistorikk t12750 og hogstvolum t03895 og setter dem sammen. -https://www.ssb.no/statbank/list/skogav -} -\examples{ -ssb_skog_omsetning() -} diff --git a/man/t03794.Rd b/man/t03794.Rd new file mode 100644 index 0000000000000000000000000000000000000000..e0cf5f5dbdd0cce75517cc16572ec5b62c414996 --- /dev/null +++ b/man/t03794.Rd @@ -0,0 +1,23 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ssb_skogsavvirkning.R +\name{t03794} +\alias{t03794} +\title{Skogsavvirkning bruttoverdi t03794 +bruttoverdi per år av tømmer, SSB tabell 03794} +\usage{ +t03794(geolevel = "fylke") +} +\arguments{ +\item{geolevel}{} +} +\value{ +en tibble med hele datasetet. +} +\description{ +Tabellen gir totalverdi av tømmer solgt per år og geografisk enhet, fra 1996 til 2018. +Litt usikker om energivirkesortimenter og ved er med. +https://www.ssb.no/statbank/list/skogav +} +\examples{ + t03794() +}