fn scatter_plot(ctx: &mut EventCtx<'_>, app: &App, filter: &Filter) -> Widget