ageller

mainPanel(
	plotOutput(“plot”)
)

ageller

output$plot <-renderPlot(
	generate_plot(input$column)
)

ageller

sidebarPanel(
  selectInput(
    "column" : "Data format:", columns
  )
)

ageller

# import libraries
library(shiny)

# possibly read in some data to be used below

# define the UI
ui <- fluidPage(
	# app title 
	headerPanel("My Title"),
	

ageller

gdf1 = gpd.GeoDataFrame(df, geometry = gpd.points_from_xy(df['LONGITUDE'], df['LATITUDE']))
gdf1.iloc[0:100].plot(ax = ax, color = 'blue', markersize = 1.)

ageller

import matplotlib.pyplot as plt
import numpy as np
f, ax = matplotlib.pyplot.subplots()
minDate = np.datetime64('2011-01-01')
maxDate = np.datetime64('2019-01-01')
bins = np.arange(minDate, maxDate, np.timedelta64(1, 'M'),  dtype = 'datetime64[M]')
ax.hist(df['CREATION DATE'], bins = bins, orientation = 'horizontal')

ageller

cmap = matplotlib.colormaps['Reds']
norm = matplotlib.colors.Normalize(vmin = min(gdf['Total Potholes']), vmax = max(gdf['Total Potholes']))
co = cmap(norm(gdf['Total Potholes']))
ap = norm((gdf['Total Potholes'])).clip(0,1)
gdf.plot(ax = ax, color = co, alpha = ap)

ageller

import rasterio rasterio
import matplotlib
f,ax = matplotlib.pyplot.subplots()
rasterio.plot.show(chicago.read(), ax = ax, transform = chicago.transform)

ageller

df['CREATION DATE'] = pd.to_datetime(df['CREATION DATE'])

ageller

if point.within(poly):
  # do something