Néhémie’s Travelogue

Section VI from the Constitution of Berlin:

Article 66

(§1) The administrative apparatus shall be organised in an unbureaucratic manner and in a democratic and social spirit in accordance with the Constitution and the law.

(§2) The boroughs shall be afforded a share of administration in accordance with the principles of self-government.

In the Berlin Constitution, the German word for “Bezirke”is translated as “boroughs”, sometime also called “district”. As an administrative “self-government” they play an important part in shaping the city. The current 12 boroughs are:

Charlottenburg-Wilmersdorf
Friedrichshain-Kreuzberg
Lichtenberg
Marzahn-Hellersdorf
Mitte
Neukölln
Pankow
Reinickendorf
Spandau
Steglitz-Zehlendorf
Tempelhof-Schöneberg
Treptow-Köpenick

Picture of the day

A Map made with r, sf and ggplot2 of the 12 boroughs of Berlin

Show the code of the exhibit

library(sf)
library(dplyr)
library(ggplot2)
lor <- st_read("s_lor_plan.gml")
lor$bezirksname <- lor$bezirksname |> as.factor()

lor |>
  group_by(bezirksname) |>
  summarise() -> bezirke

bezirke$bezirksname <- gsub("-", "\\\n-", bezirke$bezirksname)

jpeg("2022-03-01_bezirke.jpg",
     width=1200, height=1000, quality=90,
     res=120)
jitter <- position_jitter(width=5, height=15)
ggplot(bezirke) +
  geom_sf(aes(fill = bezirksname), colour = "#aaaaacc0") +
  geom_sf_text(aes(label = bezirksname),
               check_overlap = FALSE,
               fontface = "bold", size = 3, position = jitter) +
  scale_fill_brewer(palett e ="Set3") +
  theme_void()
dev.off()