---

Short term trends

---

Short term trends

Tabel 1: Custom, import and stamp duties by commodity and time

KOXAFG_raw <- 
  statgl_url("KOXAFG", lang = language) %>% 
  statgl_fetch(
    commodity = c(0, 1, 15),
    time = px_top(8),
    .col_code = TRUE
  ) %>% 
  as_tibble()
  
KOXAFG <- 
  KOXAFG_raw %>%
  mutate(commodity = commodity %>% str_remove("1.|2.") %>% trimws()) %>% 
  arrange(desc(time)) %>% 
  mutate(time = time %>% fct_inorder()) %>% 
  spread(time, value)
  
KOXAFG %>% 
  rename(" " = 1) %>% 
  statgl_table() %>% 
  row_spec(1, bold = TRUE)

	2022Q4	2022Q3	2022Q2	2022Q1	2021Q4	2021Q3	2021Q2	2021Q1
Custom and import duties	172,1	193,7	133,8	98,2	188,4	156,1	145,3	103,8
Custom, import and stamp duties	183,5	203,7	144,2	107,2	205,6	169,2	157,5	119,9
Stamp duties	11,4	10,0	10,5	9,0	17,3	13,1	12,1	16,1

See the table in our Statbank: KOXAFG

Tabel 2: Retail trade index (index 2010=100)

KOXDET_raw <- 
  statgl_url("KOXDET", lang = language) %>%
  statgl_fetch(
    time = px_top(8),
    "specification method" = 3,
    .col_code     = TRUE
  ) %>% 
  as_tibble()

KOXDET <-
  KOXDET_raw %>% 
  arrange(desc(time)) %>% 
  mutate(time = time %>% fct_inorder()) %>% 
  spread(time, value)

KOXDET %>% 
  rename(" " = 1) %>% 
  statgl_table()

	2022Q4	2022Q3	2022Q2	2022Q1	2021Q4	2021Q3	2021Q2	2021Q1
Quarterly change, seasonal adjusted (pct.)	-0,4	2,7	1,5	-0,7	0,3	-1,8	-0,3	1,7

See the table in our Statbank: KOXDET

Tabel 3: Mortgage loans, outstanding amounts by type of property

KOXOBL_raw <- 
  statgl_url("KOXOBL", lang = language) %>%
  statgl_fetch(
    time = px_top(8),
    "type of property" = px_all(),
    .col_code = TRUE
  ) %>% 
  as_tibble()

KOXOBL <- 
  KOXOBL_raw %>% 
  arrange(desc(time)) %>% 
  mutate(
    `type of property` = `type of property` %>% str_remove_all("[:digit:]|[:punct:]") %>% trimws(),
    `type of property` = `type of property` %>% fct_inorder(),
    time = time %>% fct_inorder()
         ) %>% 
  filter(value != 0.0) %>% 
  spread(time, value) %>% 
  mutate_if(is.numeric, ~replace(., is.na(.), 0))
 

KOXOBL %>% 
  rename(" " = 1) %>% 
  statgl_table(replace_0s = TRUE) %>% 
  row_spec(1, bold = TRUE)

	2022Q4	2022Q3	2022Q2	2022Q1	2021Q4	2021Q3	2021Q2	2021Q1
Total	4.988,6	5.005,6	5.021,5	4.963,6	4.926,3	4.766,0	4.698,8	4.450,7
Owneroccupied properties	2.798,4	2.813,9	2.864,3	2.864,5	2.867,5	2.831,0	2.766,9	2.733,7
Shared ownership properties	489,7	480,7	440,0	396,9	355,0	359,7	364,4	263,6
Privat rental properties	1.201,0	1.199,6	1.206,7	1.193,5	1.197,5	1.161,1	1.136,7	1.127,1
Offices and businesses	499,5	511,3	510,6	508,7	506,4	414,2	430,7	326,3

See the table in our Statbank: KOXOBL

Tabel 4: Current income tax, payable by time, municipality and type

KOXSKT_raw <- 
  statgl_url("KOXSKT", lang = language) %>%
  statgl_fetch(
    time = px_top(),
    municipal = px_all(),
    type = px_all(),
    .col_code = TRUE
  ) %>% 
  as_tibble()

KOXSKT <- 
  KOXSKT_raw %>% 
  mutate(municipal = municipal %>% fct_inorder()) %>% 
  drop_na() %>% 
  spread(municipal, value) %>% 
  mutate(type = type %>% str_remove("1.") %>% str_remove("[:digit:]") %>% trimws()) %>% 
  mutate_if(is.numeric, ~replace(., is.na(.), 0))

KOXSKT %>% 
  select(-time) %>% 
  rename(" " = 1) %>% 
  statgl_table(replace_0s = TRUE) %>% 
  pack_rows(index = KOXSKT[["time"]] %>% table()) %>% 
  row_spec(1, bold = TRUE)

	All municipalities	Kommune Kujalleq	Kommuneqarfik Sermersooq	Qeqqata Kommunia	Qeqertalik Kommune	Avannaata Kommunia	Outside municipalities
2022Q4
Income tax, total	1.429,1	136,2	716,2	209,8	118,8	220,9	27,2
National tax	336,2	31,0	170,5	50,0	27,0	50,2	7,6
Joint municipal tax	197,2	18,6	102,3	30,0	16,2	30,1	0,0
Municipal tax	876,1	86,7	443,4	129,9	75,6	140,5	0,0
Special national tax	19,7	0,0	0,0	0,0	0,0	0,0	19,7

See the table in our Statbank: KOXSKT

---

Last updated: 15. marts 2023