Jardins partagés

Données - Ville de Paris

Auteur

François Geerolf

Code 
source(here::here("_rinit.R"))
source(here::here("data", "paris", "_paris.R"))   # wkb2sfc(), paris_basemap(), arrondissements_sf()
invisible(Sys.setlocale("LC_TIME", "fr_FR.UTF-8"))
# cd ~/iCloud/website/data/paris; /usr/local/bin/R -e 'quarto::quarto_render("jardins-partages.qmd")'

knitr::opts_chunk$set(echo = TRUE, message = FALSE, warning = FALSE,
                      fig.width = 8, fig.height = 5, dpi = 150)

jp_path <- here::here("data", "paris", "jardins-partages.parquet")
jp <- arrow::read_parquet(jp_path) |>
  dplyr::mutate(
    ar     = suppressWarnings(as.integer(stringr::str_extract(arrondissement, "[0-9]+"))),
    ferme  = !is.na(date_fermeture)
  )

n_tot   <- nrow(jp)
n_actif <- sum(!jp$ferme)
arr_sf  <- arrondissements_sf()
pts_sf  <- jp |>
  dplyr::filter(!ferme) |>
  dplyr::mutate(geometry = wkb2sfc(geo_point_2d)) |>
  sf::st_as_sf(crs = 4326)

theme_carte <- theme_void(base_size = 12) +
  theme(plot.title = element_text(face = "bold"),
        plot.subtitle = element_text(colour = "grey35"),
        plot.margin = margin(5, 12, 5, 5))
theme_barres <- theme_minimal(base_size = 12) +
  theme(plot.title = element_text(face = "bold"),
        plot.subtitle = element_text(colour = "grey35"),
        panel.grid.major.y = element_blank())

189 jardins partagés recensés, cultivés par des associations d’habitants, dont 179 toujours en activité (10 ont fermé).

Code 
jp |>
  dplyr::filter(!ferme) |>
  dplyr::transmute(Nom = nom_ev, Adresse = adresse, `Gestionnaire` = nom_gerant,
                   Arrondissement = ar, `Propriétaire` = proprietaire_terrain) |>
  dplyr::slice_sample(n = 8) |>
  gt::gt() |>
  gt::sub_missing(missing_text = "—") |>
  gt::tab_header(title = "8 jardins tirés au hasard") |>
  gt::tab_options(table.width = "100%")
8 jardins tirés au hasard
Nom Adresse Gestionnaire Arrondissement Propriétaire
Leroy Sème 2 bis cité Leroy Leroy Sème 20 DEVE
Jardin des Poètes 10 rue Francis Jammes CRL 10 centre d'animation la Grange aux Belles 10 SIEMP
Jardin des Tourelles 18 passage des tourelles Jardin des Tourelles 20 Paris Habitat
Jardin Richomme 23 rue Richomme La goutte verte 18 DEVE
Jardin'âges 17 rue des Perichaux (entre square du Docteur Calmette et square Lefèvre) Entr’Aide à domicile 15 Paris Habitat
Le jardin Saint Blaise Centre Chenal Saint-Blaise 14 rue du Clos Esperem 20 Paris Habitat
Le potager de Georges 3 Square Georges Contenot (accessible par le 75-77 rue Claude Decaen) Le potager de Georges 12 Paris Habitat
Papilles et Papillons 3 rue Gasnier Guy Régie de Quartier «Papilles et Papillons» 20 SIEMP

Carte

Code 
leaflet::leaflet(pts_sf, options = leaflet::leafletOptions(minZoom = 11)) |>
  paris_basemap() |>
  leaflet::addPolygons(data = arr_sf, fill = FALSE, color = "#999", weight = 1) |>
  leaflet::addCircleMarkers(
    radius = 5, stroke = FALSE, fillOpacity = 0.85, fillColor = "#2f6f4f",
    label = ~nom_ev,
    popup = ~sprintf("<b>%s</b><br>%s<br>Gestionnaire : %s<br>Propriétaire du terrain : %s",
                     nom_ev, adresse, nom_gerant, proprietaire_terrain)
  )

Par propriétaire du terrain

Code 
jp |>
  dplyr::filter(!ferme) |>
  dplyr::count(proprietaire_terrain, sort = TRUE) |>
  dplyr::mutate(proprietaire_terrain = forcats::fct_reorder(proprietaire_terrain, n)) |>
  ggplot(aes(n, proprietaire_terrain)) +
  geom_col(fill = "#2f6f4f", width = 0.6) +
  geom_text(aes(label = n), hjust = -0.3, size = 3) +
  scale_x_continuous(expand = expansion(mult = c(0, 0.12))) +
  labs(title = "Propriétaire du terrain",
       subtitle = "Le plus souvent la Ville de Paris (DEVE) elle-même",
       x = NULL, y = NULL) +
  theme_barres

Source & données

Code 
tibble::tibble(
  ` ` = c("Jeu de données", "Producteur", "Licence", "Fichier", "Mise à jour", "Observations"),
  `  ` = c(
    "[Jardins partagés](https://opendata.paris.fr/explore/dataset/jardins-partages/information/)",
    "Direction des Espaces Verts et de l'Environnement (DEVE) — Ville de Paris",
    "Open Database License (ODbL)",
    sprintf("`data/paris/jardins-partages.parquet` (%s ko) + `arrondissements.parquet`",
            round(file.size(jp_path) / 1024)),
    format(as.Date(file.mtime(jp_path)), "%d %B %Y"),
    sprintf("%d jardins (%d actifs)", n_tot, n_actif)
  )
) |>
  gt::gt() |> gt::fmt_markdown(columns = `  `) |>
  gt::tab_options(table.width = "100%", column_labels.hidden = TRUE)
Jeu de données Jardins partagés
Producteur Direction des Espaces Verts et de l’Environnement (DEVE) — Ville de Paris
Licence Open Database License (ODbL)
Fichier data/paris/jardins-partages.parquet (29 ko) + arrondissements.parquet
Mise à jour 05 septembre 2026
Observations 189 jardins (179 actifs)