31:T179c,viewof summary_chart = vega_embed({ '$schema': 'https://vega.github.io/schema/vega-lite/v2.6.0.json', 'padding': {'left': -60}, 'config': { 'view': { 'height': 300, 'width': 400 } }, 'data': { 'values': totals_ts.data }, 'resolve': { 'scale': { 'x': 'shared', 'color': 'independent' } }, 'vconcat': [{ 'layer': [{ 'encoding': { 'color': { 'value': 'green' }, 'x': { 'axis': { 'labels': true, 'title': '' }, 'field': 'yearquarter_end_date', 'type': 'temporal' }, 'y': { 'axis': { 'title': 'Stock of outstanding cases at end of quarter' }, 'field': 'sum_outstanding', 'type': 'quantitative' } }, 'height': 200, 'mark': 'line', 'title': 'Cases outstanding', 'width': 600 }, { 'encoding': { 'color': { 'value': 'green' }, 'opacity': { 'condition': { 'selection': 'selector004', 'value': 1 }, 'value': 0 }, 'text': { 'field': 'sum_outstanding', 'type': 'quantitative', 'format': ',.0f' }, 'x': { 'field': 'yearquarter_end_date', 'type': 'temporal' }, 'y': { 'field': 'sum_outstanding', 'type': 'quantitative' } }, 'height': 200, 'mark': { 'dx': 0, 'dy': -7, 'type': 'text' }, 'selection': { 'selector004': { 'empty': 'none', 'fields': [ 'yearquarter' ], 'nearest': true, 'on': 'mouseover', 'type': 'single' } }, 'title': 'Cases outstanding', 'width': 600 }] }, { 'layer': [{ 'encoding': { 'color': { 'value': '#b74f4f' }, 'x': { 'axis': { 'title': '' }, 'field': 'yearquarter_mid_date', 'type': 'temporal' }, 'y': { 'axis': { 'title': 'Number of cases during the quarter' }, 'field': 'sum_receipts', 'type': 'quantitative' } }, 'height': 200, 'mark': 'line', 'title': 'Receipts and disposals', 'width': 600 }, { 'encoding': { 'color': { 'value': '#6b8dda' }, 'x': { 'axis': { 'title': '' }, 'field': 'yearquarter_mid_date', 'type': 'temporal' }, 'y': { 'field': 'sum_disposals', 'type': 'quantitative' } }, 'height': 200, 'mark': 'line', 'title': 'Receipts and disposals', 'width': 600 }, { 'encoding': { 'color': { 'field': 'legend_value', 'scale': { 'domain': [ 'Disposals', 'Receipts' ], 'range': [ '#6b8dda', '#b74f4f' ] }, 'type': 'nominal', 'legend': { 'title': '' } }, 'opacity': { 'condition': { 'selection': 'selector004', 'value': 1 }, 'value': 0 }, 'text': { 'field': 'chart_text', 'type': 'ordinal' }, 'x': { 'axis': { 'title': '' }, 'field': 'yearquarter_mid_date', 'type': 'temporal' }, 'y': { 'field': 'chart_text_y', 'type': 'quantitative' } }, 'mark': { 'dy': -10, 'type': 'text' }, 'width': 600 }, { 'encoding': { 'text': { 'field': 'receipts_label', 'type': 'ordinal' }, 'x': { 'axis': { 'title': '' }, 'field': 'yearquarter_mid_date', 'type': 'temporal' }, 'y': { 'field': 'sum_receipts', 'type': 'quantitative' }, 'color': { 'value': '#b74f4f' } }, 'mark': { 'dx': 5, 'type': 'text', 'align': 'left', 'baseline': 'middle' }, 'width': 600 }, { 'encoding': { 'text': { 'field': 'disposals_label', 'type': 'ordinal' }, 'x': { 'axis': { 'title': '' }, 'field': 'yearquarter_mid_date', 'type': 'temporal' }, 'y': { 'field': 'sum_disposals', 'type': 'quantitative' }, 'color': { 'value': '#6b8dda' } }, 'mark': { 'dx': 5, 'type': 'text', 'align': 'left', 'baseline': 'middle' }, 'width': 600 }, { 'encoding': { 'opacity': { 'condition': { 'selection': 'selector004', 'value': 1 }, 'value': 0 }, 'x': { 'field': 'yearquarter_mid_date', 'type': 'temporal' }, 'y': { 'field': 'sum_receipts', 'type': 'quantitative' }, 'y2': { 'field': 'sum_disposals', 'type': 'quantitative' } }, 'height': 200, 'mark': 'rule', 'selection': { 'selector004': { 'empty': 'none', 'fields': [ 'yearquarter' ], 'nearest': true, 'on': 'mouseover', 'type': 'single' } }, 'title': 'Cases outstanding', 'width': 600 }] }] })32:T4ab,viewof heatmap = vega_embed({ "config": {"view": {"width": 400, "height": 300}}, 'data': { 'values': datatable_filtered.sql(`select * from df where yearquarter = '${report_period}'`) }, "mark": "rect", "encoding": { "color": {"type": "quantitative", "field": "outstanding_q"}, "tooltip" : {"type":"quantitative", "field":'outstanding_q'}, "x": {"type": "nominal", "field": "crown_court_centre"}, "y": {"type": "nominal", "field": "offence_type"} }, "height": 200, "selection": { "selector001": { "type": "single", "nearest": true, "on": "mousemove", "fields": ["offence_type", "crown_court_centre"], "empty": "none", "resolve": "global" } }, "title": `Cases outstanding in ${report_period}`, "transform": [ { "aggregate": [ {"op": "sum", "field": "receipts", "as": "receipts_q"}, {"op": "sum", "field": "disposals", "as": "disposals_q"}, {"op": "sum", "field": "outstanding", "as": "outstanding_q"} ], "groupby": ["yearquarter", "crown_court_centre", "offence_type"] } ], "width": 600, "$schema": "https://vega.github.io/schema/vega-lite/v2.6.0.json" })33:T54d,customised_report_md = md`${txt_court_offence.r.inc_dec_sym_qt} ${txt_court_offence.r.spark} Receipts were ${txt_court_offence.r.latest_total}, a ${txt_court_offence.r.inc_dec_text_qt} ${txt_court_offence.r.absolute_change_qt} (${txt_court_offence.r.percentage_change_qt}) since last quarter, and a ${txt_court_offence.r.inc_dec_text_yr} ${txt_court_offence.r.absolute_change_yr} (${txt_court_offence.r.percentage_change_yr}) since the same quarter last year. ${txt_court_offence.d.inc_dec_sym_qt} ${txt_court_offence.d.spark} Disposals were ${txt_court_offence.d.latest_total}, a ${txt_court_offence.d.inc_dec_text_qt} ${txt_court_offence.d.absolute_change_qt} (${txt_court_offence.d.percentage_change_qt}) since last quarter, and a ${txt_court_offence.d.inc_dec_text_yr} ${txt_court_offence.d.absolute_change_yr} (${txt_court_offence.d.percentage_change_yr}) since the same quarter last year. ${txt_court_offence.o.inc_dec_sym_qt} ${txt_court_offence.o.spark} The number of cases outstanding was ${txt_court_offence.o.latest_total}, a ${txt_court_offence.o.inc_dec_text_qt} ${txt_court_offence.o.absolute_change_qt} (${txt_court_offence.o.percentage_change_qt}) since last quarter, and a ${txt_court_offence.o.inc_dec_text_yr} ${txt_court_offence.o.absolute_change_yr} (${txt_court_offence.o.percentage_change_yr}) since the same quarter last year.`34:[] 2f:{"title":"DRAFT PROTOTYPE: Receipts, Disposals and Cases Outstanding at the Crown Court","cells":[{"id":11,"value":"title = md`# DRAFT PROTOTYPE: Receipts, Disposals and Cases Outstanding at the Crown Court`","pinned":false,"hidden":false,"mode":"ojs"},{"id":77,"value":"md`\nThese statistics cover triable either way and indictable only offences, and are based on open data published [here](https://www.gov.uk/government/statistics/criminal-court-statistics-quarterly-october-to-december-2017). \n \n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":244,"value":"md`**This is a draft prototype and may contain errors**.`","pinned":false,"hidden":false,"mode":"ojs"},{"id":57,"value":"report_period_html = html`You are viewing report for . You may change this value to access historical reports.`","pinned":false,"hidden":false,"mode":"ojs"},{"id":84,"value":"subtitle_1 = md`\n## Key statistics for ${rdo.latest_yearquarter(datatable_filtered)}`","pinned":false,"hidden":false,"mode":"ojs"},{"id":132,"value":"main_commentary = md`${txt.r.inc_dec_sym_qt} ${txt.r.spark} Receipts were ${txt.r.latest_total}, a ${txt.r.inc_dec_text_qt} ${txt.r.absolute_change_qt} (${txt.r.percentage_change_qt}) since last quarter, and a ${txt.r.inc_dec_text_yr} ${txt.r.absolute_change_yr} (${txt.r.percentage_change_yr}) since the same quarter last year.\n\n${txt.d.inc_dec_sym_qt} ${txt.d.spark} Disposals were ${txt.d.latest_total}, a ${txt.d.inc_dec_text_qt} ${txt.d.absolute_change_qt} (${txt.d.percentage_change_qt}) since last quarter, and a ${txt.d.inc_dec_text_yr} ${txt.d.absolute_change_yr} (${txt.d.percentage_change_yr}) since the same quarter last year.\n\n${txt.o.inc_dec_sym_qt} ${txt.o.spark} The number of cases outstanding was ${txt.o.latest_total}, a ${txt.o.inc_dec_text_qt} ${txt.o.absolute_change_qt} (${txt.o.percentage_change_qt}) since last quarter, and a ${txt.o.inc_dec_text_yr} ${txt.o.absolute_change_yr} (${txt.o.percentage_change_yr}) since the same quarter last year.`","pinned":false,"hidden":false,"mode":"ojs"},{"id":514,"value":"summary_charts_title = md`## Summary charts`","pinned":false,"hidden":false,"mode":"ojs"},{"id":519,"value":"$31","pinned":false,"hidden":false,"mode":"ojs"},{"id":639,"value":"chart_md_output = {\n if (chart_signal == 0) {\n return md``\n } else {\n return md`During ${chart_signal.yearquarter}, there were ${cht_md.receipts} receipts and ${cht_md.disposals} disposals. Since ${cht_md.exceeded_text}, the number of cases outstanding ${cht_md.outstanding_inc_dec} by ${cht_md.outstanding_abs}, to ${cht_md.outstanding} by the end of the quarter (${cht_md.quarter_end}), ${cht_md.outstanding_up_down} from ${cht_md.outstanding_prev} at the end of the previous quarter (${cht_md.quarter_end_prev})`\n \n }\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":842,"value":"$32","pinned":false,"hidden":false,"mode":"ojs"},{"id":688,"value":"customised_report_title = md`## Customised report for ${heatmap_selection.offence_type} in ${selected_court}, for ${report_period}`","pinned":false,"hidden":false,"mode":"ojs"},{"id":826,"value":"choose_court = html`Select a court for a customised report: \n\n\n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":1125,"value":"$33","pinned":false,"hidden":false,"mode":"ojs"},{"id":917,"value":"datatable_filtered_court_offence = {\n let df_filtered = datatable_filtered.sql(`\n select * from df where \n offence_type = '${selected_offence}' and \n crown_court_centre = '${selected_court}'\n`)\n return new dt.DataTable(df_filtered)\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":890,"value":"populate_custom_select_boxes = {\n let sel = document.getElementById(\"custom_report_court\")\n \n if (heatmap_selection == 0) {\n sel.value = \"Aylesbury\"\n } else {\n sel.value = heatmap_selection.crown_court_centre\n }\n\n \n let ev = new CustomEvent('input')\n sel.dispatchEvent(ev)\n \n \n sel = document.getElementById(\"custom_report_offence\")\n if (heatmap_selection == 0) {\n sel.value = \"Criminal Damage And Arson\"\n } else {\n sel.value = heatmap_selection.offence_type\n }\n\n ev = new CustomEvent('input')\n sel.dispatchEvent(ev)\n \n return md``\n}\n","pinned":false,"hidden":false,"mode":"ojs"},{"id":920,"value":"selected_court = {\n let a = choose_court\n return rdo.select_box_within_html('custom_report_court')\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":1108,"value":"selected_offence = {\n let a = choose_court\n return rdo.select_box_within_html('custom_report_offence')\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":64,"value":"md`## Code is linear from here`","pinned":false,"hidden":false,"mode":"ojs"},{"id":42,"value":"import {requireFromGithub} from \"@bumbeishvili/fetcher\"","pinned":false,"hidden":false,"mode":"ojs"},{"id":522,"value":"vega_embed = require(\"vega-embed@3\")","pinned":false,"hidden":false,"mode":"ojs"},{"id":4,"value":"dt = requireFromGithub(\"https://raw.githubusercontent.com/RobinL/open_data_munge/a6c4a2dfe7d9dc546ea43ec3a828f59faa189c1e/build/open-data-munge.js\")","pinned":false,"hidden":false,"mode":"ojs"},{"id":40,"value":"rdo = requireFromGithub('https://raw.githubusercontent.com/RobinL/rdo_code/f790d3add3e2f8dbcac81dccce6b364a2df5b587/build/rdo_code.js')","pinned":false,"hidden":false,"mode":"ojs"},{"id":20,"value":"datatable_raw = {\n let url = \"https://gist.githubusercontent.com/RobinL/5a3fb37c43c017a051ea7ece1804d18b/raw/bb0816955fbd30514d993ab7c2cb379837abc41a/tidy_timeliness.csv\" \n \n let raw_data = await rdo.get_csv_and_parse(url)\n \n let dt_raw = new dt.DataTable(raw_data)\n let dt_trans = dt_raw.mutate_col(\"yearquarter\", \"yearquarter_end_date\", dt.timeparse_quarter_end)\n dt_trans = dt_trans.mutate_col(\"yearquarter\", \"yearquarter_mid_date\", dt.timeparse_quarter_mid)\n\n return dt_trans\n}\n ","pinned":false,"hidden":false,"mode":"ojs"},{"id":73,"value":"report_period = { \n let a = report_period_html \n return rdo.select_box_within_html('report_period_select')\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":612,"value":"chart_signal = rdo.observe_chart_signal(summary_chart, \"selector004\")","pinned":false,"hidden":false,"mode":"ojs"},{"id":850,"value":"heatmap_selection = Generators.observe(notify => {\n const signaled = (name, value) => notify(value);\n heatmap.addSignalListener(\"selector001\", signaled);\n notify(heatmap.signal(\"selector001\"));\n return () => heatmap.removeSignalListener(\"selector001\", signaled);\n})","pinned":false,"hidden":false,"mode":"ojs"},{"id":90,"value":"datatable_filtered = {\n let df_filtered = datatable_raw.sql(`select * from df where yearquarter <= '${report_period}'`)\n return new dt.DataTable(df_filtered)\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":924,"value":"elem = document.getElementById(\"custom_report_court\")","pinned":false,"hidden":false,"mode":"ojs"},{"id":140,"value":"totals_ts = dt.TimeSeries(rdo.total_by_quarter(datatable_filtered), \"yearquarter\")","pinned":false,"hidden":false,"mode":"ojs"},{"id":1116,"value":"totals_ts_court_offence = dt.TimeSeries(rdo.total_by_quarter(datatable_filtered_court_offence), \"yearquarter\")","pinned":false,"hidden":false,"mode":"ojs"},{"id":207,"value":"txt = {\n let txt = rdo.get_keystats_dicts(totals_ts, \"yearquarter_mid_date\", dt)\n return txt\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":1120,"value":"txt_court_offence = {\n let txt = rdo.get_keystats_dicts(totals_ts_court_offence, \"yearquarter_mid_date\", dt)\n return txt\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":808,"value":"cht_md = rdo.get_chart_md(totals_ts, chart_signal, report_period, dt)","pinned":false,"hidden":false,"mode":"ojs"},{"id":829,"value":"datatable_filtered.data[0]","pinned":false,"hidden":false,"mode":"ojs"}],"files":"$W34","stdlib":"1","titling":"auto"}