# PolygonLayer

The `PolygonLayer` renders filled and/or stroked polygons.

    sample_data <- paste0(
      "https://raw.githubusercontent.com/",
      "uber-common/deck.gl-data/",
      "master/website/sf-zipcodes.json"
    )

    properties <- list(
      pickable = TRUE,
      stroked = TRUE,
      filled = TRUE,
      wireframe = TRUE,
      lineWidthMinPixels = 1,
      getPolygon = ~contour,
      getElevation = JS("d => d.population / d.area / 10"),
      getFillColor = JS("d => [d.population / d.area / 60, 140, 0]"),
      getLineColor = c(80, 80, 80),
      getLineWidth = 1,
      getTooltip = JS("object => `${object.zipcode}<br/>Population: ${object.population}`")
    )

    deck <- deckgl(zoom = 11, pitch = 25) %>%
      add_polygon_layer(data = sample_data, properties = properties) %>%
      add_mapbox_basemap()

    if (interactive()) deck

See also deckgl-api-reference-polygon-layer