2d:["$","title",null,{"children":"2019/2022 Australian federal election House of Representatives polling booth swings | Max Bo | Observable"}] 32:T11ea,This notebook attempts to visualize individual polling booth swings of the [2019](https://en.wikipedia.org/wiki/2019_Australian_federal_election) and [2022](https://en.wikipedia.org/wiki/2022_Australian_federal_election) Australian federal elections. The swings of the 2019 and 2022 elections on a _per electoral division basis_ are already well documented, like the following fantastic pieces of data journalism: - How the seeds of the 2022 election result were sown years ago by Fell, Spraggon, Tilley, Liddy (2022) - How Labor won by Gourlay, Piper, Leslie, Tilley, Liddy (2022) - How the election result has changed our cities by Leslie, Gourlay, Tilley, Piper, Liddy (2022) - See how the Coalition defied the polls to retain power by Donoughue, Hoad, Gourlay, Leslie, Tilley (2019) However, the [Australian Electoral Commission](https://www.aec.gov.au/) provides granular result data for each polling booth. I've yet to see any sort of investigation or visualisation of this data, but it raised some questions: _What's the swing variation between polling booths per division? What factors influence these variations?_ Inspired by How Trump Reshaped the Election Map (permalink) by Buchanan et al. (2016), and the recent release of the [`Plot.vector` mark](https://observablehq.com/@observablehq/plot-vector), I thought I'd cook up some visualisations of my own. First, a primer on a few relevant details of the Australian electoral system:

Australia's [lower house](https://en.wikipedia.org/wiki/Lower_house) is the [House of Representatives](https://en.wikipedia.org/wiki/Australian_House_of_Representatives) and its [upper house](https://en.wikipedia.org/wiki/Upper_house) is the [Senate](https://en.wikipedia.org/wiki/Australian_Senate). We'll be analysing the House of Representatives data because of its greater representativeness and smaller electoral divisions.
The House of Representatives uses the [instant run-off voting](https://en.wikipedia.org/wiki/Instant-runoff_voting) system, a type of [ranked preferential](https://en.wikipedia.org/wiki/Ranked_voting) voting for single-candidate elections.
IRV comes with some associated concepts and definitions. I'll be using the variations of the definitions that are most useful for describing the data in this notebook.

[Two-[candidate]-preferred vote](https://en.wikipedia.org/wiki/Two-party-preferred_vote)

The result of an election after preferences have been distributed to the highest two candidates, who in some cases can be independents.

[Swing](https://en.wikipedia.org/wiki/Swing)

The extent of change in voter support, from one election to another, expressed as a positive or negative percentage point. The _two-candidate-preferred (TCP) swing_ is the swing of the two-candiate-preferred vote.
[The Coalition](https://en.wikipedia.org/wiki/Coalition_(Australia) is an alliance of centre-right political parties that forms one of the two major groupings in Australian federal politics. It consists of:
- The [Liberal Party](https://en.wikipedia.org/wiki/Liberal_Party_of_Australia) (${partyAbbreviation("LP")})
- The [National Party](https://en.wikipedia.org/wiki/National_Party_of_Australia) (${partyAbbreviation("NP")})
- The [Liberal National Party](https://en.wikipedia.org/wiki/Liberal_National_Party_of_Queensland) (${partyAbbreviation("LNP")}), a merger of the Queensland branches of the Liberal Party and National Party
- The [Country Liberal Party](https://en.m.wikipedia.org/wiki/Country_Liberal_Party) (${partyAbbreviation("CLP")}), a Northern Territory offshoot of the predecessor of the National Party

33:T442,addTooltips( Plot.plot({ width, color: { ...makePartyScale(selectedElection.majorPartyFirstPreference), legend: true, label: "Party" }, caption: "The size of the arrow is proportional to the number of votes gained or lost. Hover for more details.", facet: { data: searchedDivisions, x: "Group" }, x: { tickFormat: "%", transform: (d) => d / 100 }, y: { label: "Division", // group by state domain: _.sortBy(searchedDivisions, "StateAb").map((d) => d.DivisionNm_1) }, marks: [ Plot.ruleX([0]), Plot.frame(), Plot.vector(searchedDivisions, { y: "DivisionNm_1", x: "Swing", // if Swing is 100 point right, if Swing is 0, point up, if Swing is -100 point left rotate: (d) => (d.Swing / 100) * 90, // arrow length should match the magnitude of the swing, length: (d) => Math.abs(d.Swing) * d.OrdinaryVotes, stroke: (d) => d.PartyAb, title: enableTooltips ? getTooltip : undefined }) ] }) )34:T57a,facetByIncome = Plot.plot({ // title: `${selectedElection.year} Australian federal election House of Representatives polling booth swings`, // subtitle: `By ${incomeMetric.toLowerCase()}`, width, color: { ...makePartyScale(selectedElection.majorPartyFirstPreference), legend: true, label: "Party" }, caption: "The size of the dot is proportional to the number of votes gained or lost. Hover for more details.", facet: { data: selectedElection.majorPartyFirstPreference, y: facetByGroup ? "Group" : undefined, x: facetByState ? "StateAb" : undefined }, x: { clamp: true, grid: true, domain: [27000, 70000], label: `${incomeMetric} ($) →`, tickFormat: "$s" }, y: { tickFormat: "%", transform: (d) => d / 100 }, r: { range: [0, 3] }, marks: [ Plot.ruleY([0]), Plot.frame(), Plot.dot(selectedElection.majorPartyFirstPreference, { y: "Swing", tip: true, x: incomeMetric === "Median income" ? "MedianIncome" : "AverageIncome", r: (d) => Math.abs(d.Swing) * d.OrdinaryVotes, stroke: (d) => d.PartyAb, title: enableTooltips ? getTooltip : undefined }), Plot.linearRegressionY(selectedElection.majorPartyFirstPreference, { y: "Swing", x: incomeMetric === "Median income" ? "MedianIncome" : "AverageIncome", stroke: (d) => d.PartyAb }) ] })35:T4c1,plotMap = ({ data, showNegativeSwings, scaleBooth }) => { return Plot.plot({ color: { ...makePartyScale(data), legend: true, label: "Party" }, projection: { type: "mercator", rotate: [-133, 27], domain: { type: "MultiPoint", coordinates: [ [113, -24], [154, -28], [141, -10.5], [146, -44] ] } }, caption: "Swings away from a candidate point left, swings to a candidate point right. Hover for more details.", marks: [ Plot.graticule(), Plot.sphere(), Plot.geo(land), Plot.geo(divisionGeojson2022, { strokeOpacity: 0.5 }), Plot.vector(data, { x: "Longitude", y: "Latitude", filter: (d) => (showNegativeSwings ? true : d.Swing > 0), // if Swing is 100 point right, if Swing is 0, point up, if Swing is -100 point left rotate: (d) => (d.Swing / 100) * 90, // arrow length should match the magnitude of the swing, length: (d) => scaleBooth ? Math.abs(d.Swing) * d.OrdinaryVotes : Math.abs(d.Swing), stroke: (d) => d.PartyAb, title: enableTooltips ? getTooltip : undefined }) ] }); }36:T6c1,plotDeckMap = ({ data, getArrowLength, showNegativeSwings, scaleBooth }) => { data = showNegativeSwings ? data : data.filter((d) => d.Swing > 0); const iconLayer = new deck.IconLayer({ id: `icon-layer-${Date.now()}`, data: data.objects(), pickable: true, // iconAtlas and iconMapping are required iconAtlas: FileAttachment("arrow@1.png").url(), iconMapping: { arrow: { x: 0, y: 0, width: 128, height: 128, mask: true } }, getIcon: (d) => "arrow", sizeScale: 2, getPosition: (d) => [d.Longitude, d.Latitude], getAngle: (d) => (d.Swing / 100) * -90, getSize: (d) => // We want arrows to be all the same size across all maps getArrowLength( scaleBooth ? Math.abs(d.Swing) * d.OrdinaryVotes : Math.abs(d.Swing) ), getColor: getPartyColor }); const geojsonLayer = new deck.GeoJsonLayer({ id: "geojson-layer", data: selectedElection.divisionGeojson, opacity: 1, filled: false, stroked: true, wireframe: true, lineWidthMinPixels: 2 }); const layers = [iconLayer, geojsonLayer]; const container = html`

`; // https://deck.gl/docs/api-reference/core/deckgl const deckgl = new deck.DeckGL({ container, map: mapboxgl, mapboxAccessToken: "", mapboxApiAccessToken: "pk.eyJ1IjoibWF4Ym8iLCJhIjoiY2lsd2JnZDRyMDFxNHZna3MwZDZmN2R0ZCJ9.32XWATCazaiDzdW6bXvBxw", mapStyle: "mapbox://styles/mapbox/light-v10", layers, initialViewState: { longitude: 135, latitude: -26, zoom: 3 }, controller: true, getTooltip: ({ object }) => object && getTooltip(object) }); deckgl.setProps({ layers }); return container; }37:[{"id":"e1f74522eb5e73692202d5c9873a7841ef779f4b4466671c63c71105c33726a6adeae266923c934e2183b240fdb4dca173275ee9455b4e30cd82e25deb1e2130","href":"https://static.observableusercontent.com/files/e1f74522eb5e73692202d5c9873a7841ef779f4b4466671c63c71105c33726a6adeae266923c934e2183b240fdb4dca173275ee9455b4e30cd82e25deb1e2130","name":"arrow@1.png","type":"image/png","lastModified":1651797190104.796,"size":1214},{"id":"76833daf4f36b8e3a6d350f08deea931c3bf0a6bbba7750fa4568ce98736aa6ca7639a2a28559b7d5664e90fa2d95409703be3b6471f43cf3bc1ba03bc622c16","href":"https://static.observableusercontent.com/files/76833daf4f36b8e3a6d350f08deea931c3bf0a6bbba7750fa4568ce98736aa6ca7639a2a28559b7d5664e90fa2d95409703be3b6471f43cf3bc1ba03bc622c16","name":"australia_20.geojson","type":"application/geo+json","lastModified":1678759542259.991,"size":10568237},{"id":"def031d704488af832629e889c1f3656341653d082dc13bbaa482414bacdd117f6cfd1552dbacd011217f2b5ec5c974333586534e6581ccfd1309f36d2afd16d","href":"https://static.observableusercontent.com/files/def031d704488af832629e889c1f3656341653d082dc13bbaa482414bacdd117f6cfd1552dbacd011217f2b5ec5c974333586534e6581ccfd1309f36d2afd16d","name":"HouseStateFirstPrefsByPollingPlaceDownload-24310-SA.csv","type":"text/csv","lastModified":1656463685226.22,"size":535075},{"id":"33559642285e97a2fcc8df2599c61cf32f5fa35b04f25b4581ba46e5ecb900fd9baa69b3a35fdafb822f61bb64da935c38709e6f7a60be306c34ed962e427550","href":"https://static.observableusercontent.com/files/33559642285e97a2fcc8df2599c61cf32f5fa35b04f25b4581ba46e5ecb900fd9baa69b3a35fdafb822f61bb64da935c38709e6f7a60be306c34ed962e427550","name":"HouseStateFirstPrefsByPollingPlaceDownload-24310-ACT.csv","type":"text/csv","lastModified":1656463682223.152,"size":95950},{"id":"d7c421ce2eb2d904bfd101e4fcb8fbeb553b05e9f7b293504cebdbeba999ce33ab7d7397e37d4865edb77c4c66eb174d65c595e7091e32945226b784204cc1a1","href":"https://static.observableusercontent.com/files/d7c421ce2eb2d904bfd101e4fcb8fbeb553b05e9f7b293504cebdbeba999ce33ab7d7397e37d4865edb77c4c66eb174d65c595e7091e32945226b784204cc1a1","name":"HouseStateFirstPrefsByPollingPlaceDownload-24310-NT.csv","type":"text/csv","lastModified":1656463681971.479,"size":53617},{"id":"460023f05a5a30cb5d9b86c972429104bd45a67af4dd13474bc2dfdb8d5538878e99da305e24e96d99657a3872ab12fccc97bb268cacaa4a12a61b6d2b55eadf","href":"https://static.observableusercontent.com/files/460023f05a5a30cb5d9b86c972429104bd45a67af4dd13474bc2dfdb8d5538878e99da305e24e96d99657a3872ab12fccc97bb268cacaa4a12a61b6d2b55eadf","name":"HouseStateFirstPrefsByPollingPlaceDownload-24310-TAS.csv","type":"text/csv","lastModified":1656463683558.445,"size":219503},{"id":"6ca5f394ced1baabf28baa969cf0ec458359358f5b6902bb2f797911988f3252ee32101c8a515b19d88a64de873717bd377c858564be5175cafc931a1da8bbba","href":"https://static.observableusercontent.com/files/6ca5f394ced1baabf28baa969cf0ec458359358f5b6902bb2f797911988f3252ee32101c8a515b19d88a64de873717bd377c858564be5175cafc931a1da8bbba","name":"HouseStateFirstPrefsByPollingPlaceDownload-24310-WA.csv","type":"text/csv","lastModified":1656463685787.197,"size":776475},{"id":"76de45c5790882877b6706a915b3eb82976603e3741e6619cfaf33cb480a20ff5afeb02c85fe18f59bfb63f683128ab0080167469bd46ee4b0e59a96b9f26187","href":"https://static.observableusercontent.com/files/76de45c5790882877b6706a915b3eb82976603e3741e6619cfaf33cb480a20ff5afeb02c85fe18f59bfb63f683128ab0080167469bd46ee4b0e59a96b9f26187","name":"HouseStateFirstPrefsByPollingPlaceDownload-24310-VIC.csv","type":"text/csv","lastModified":1656463688300.283,"size":1525986},{"id":"8e5832cb996481e204f39a47da11f836725d916f71c6f3e311d2066e376cd4c2fd0f0a448e0ea6f04d3b459fa046912dfa6727d24f7039474fc45f06ce3e4d41","href":"https://static.observableusercontent.com/files/8e5832cb996481e204f39a47da11f836725d916f71c6f3e311d2066e376cd4c2fd0f0a448e0ea6f04d3b459fa046912dfa6727d24f7039474fc45f06ce3e4d41","name":"HouseStateFirstPrefsByPollingPlaceDownload-24310-QLD.csv","type":"text/csv","lastModified":1656463688059.993,"size":1436774},{"id":"1feb330d44616681afef4e0a73e930feb3305159add2e55def77fb56fb7cc8852dee350ab43ed82f206b05788b95bcbbe81dc84cb63350e4cec8478b1a2eedd4","href":"https://static.observableusercontent.com/files/1feb330d44616681afef4e0a73e930feb3305159add2e55def77fb56fb7cc8852dee350ab43ed82f206b05788b95bcbbe81dc84cb63350e4cec8478b1a2eedd4","name":"HouseStateFirstPrefsByPollingPlaceDownload-24310-NSW.csv","type":"text/csv","lastModified":1656463688839.145,"size":2152877},{"id":"277ac464e46dc8aa6947096833d0d1dfa881eb43884363754d19f50c37565243e6d99c0c8e09b6711b96d3c432eb90898052a1ace37cbd9319fa15cf13dfb5b7","href":"https://static.observableusercontent.com/files/277ac464e46dc8aa6947096833d0d1dfa881eb43884363754d19f50c37565243e6d99c0c8e09b6711b96d3c432eb90898052a1ace37cbd9319fa15cf13dfb5b7","name":"GeneralPollingPlacesDownload-24310@1.csv","type":"text/csv","lastModified":1656463915928.844,"size":1077031},{"id":"a4b1ade321537b3ad378d664320c747d13832cc5dd56c12f0371feff4cf7cd1b8b8ff9fe14b20f46edbd34a84cad92989a405f9d55f764e9a99d82d69e4fb32a","href":"https://static.observableusercontent.com/files/a4b1ade321537b3ad378d664320c747d13832cc5dd56c12f0371feff4cf7cd1b8b8ff9fe14b20f46edbd34a84cad92989a405f9d55f764e9a99d82d69e4fb32a","name":"8a7bfe9e-ad35-4a0a-be52-52058fea1bca.csv","type":"text/csv","lastModified":1656465224886.951,"size":290083},{"id":"52f963d969d7b29e1fee0a6abc408d2ec06a24073bb4ab7e8e22b39c2dadf61231c961f5e6de0b04d1901ceacf37fb5aebfc1cd7d51ceb532e6c8f1329d2fb9a","href":"https://static.observableusercontent.com/files/52f963d969d7b29e1fee0a6abc408d2ec06a24073bb4ab7e8e22b39c2dadf61231c961f5e6de0b04d1901ceacf37fb5aebfc1cd7d51ceb532e6c8f1329d2fb9a","name":"HouseTcpByCandidateByPollingPlaceDownload-27966.csv","type":"text/csv","lastModified":1658732186925.7,"size":1539828},{"id":"293c8812590f3131a2e619e971d4aa8a22ce100a71068bcdecbc6bdd7f0c8e5d430251d9e09fd5d49ab2657eb771e662885bdcc327b7dfee6ab17eddd69d1f27","href":"https://static.observableusercontent.com/files/293c8812590f3131a2e619e971d4aa8a22ce100a71068bcdecbc6bdd7f0c8e5d430251d9e09fd5d49ab2657eb771e662885bdcc327b7dfee6ab17eddd69d1f27","name":"HouseTcpByCandidateByPollingPlaceDownload-24310@1.csv","type":"text/csv","lastModified":1658732113434.772,"size":1627125},{"id":"ad558888a6e0e8b4083b3aaebd5664b645be2f09c29b7888b12f1977318e1ebf333a0cff275e32b21cdb0bde9d3b3dec252bab328fa0b2106dd691fa7cc27480","href":"https://static.observableusercontent.com/files/ad558888a6e0e8b4083b3aaebd5664b645be2f09c29b7888b12f1977318e1ebf333a0cff275e32b21cdb0bde9d3b3dec252bab328fa0b2106dd691fa7cc27480","name":"HouseStateFirstPrefsByPollingPlaceDownload-27966-QLD.csv","type":"text/csv","lastModified":1658731679822.808,"size":1299088},{"id":"57f580de1d79878ae4dc6710af2b2c34738e8263ad9a48cf6423271808828efa08d3970cfc8f1a5f60b95117a111207b0204895153ed8a2d71e7421f395409c4","href":"https://static.observableusercontent.com/files/57f580de1d79878ae4dc6710af2b2c34738e8263ad9a48cf6423271808828efa08d3970cfc8f1a5f60b95117a111207b0204895153ed8a2d71e7421f395409c4","name":"HouseStateFirstPrefsByPollingPlaceDownload-27966-VIC.csv","type":"text/csv","lastModified":1658731678788.202,"size":1724993},{"id":"4f6114bb0992fb17bbccdfe2cd6e79dd935e2fbeb3a2aa2710f0d8143d32073e1a46f482120e886deadda68b39beb39ff8f423dcfe64b81190bebd13eaa28718","href":"https://static.observableusercontent.com/files/4f6114bb0992fb17bbccdfe2cd6e79dd935e2fbeb3a2aa2710f0d8143d32073e1a46f482120e886deadda68b39beb39ff8f423dcfe64b81190bebd13eaa28718","name":"HouseStateFirstPrefsByPollingPlaceDownload-27966-NSW.csv","type":"text/csv","lastModified":1658731678629.423,"size":2297315},{"id":"98ea852a74691406fa8ed7c0d9926359435c96be0f3641534ff7e78ad1a71fc3dad586d71aef1aca8475891a5df1a4990ab2cb1c1d8ab405ffbe1b625680a186","href":"https://static.observableusercontent.com/files/98ea852a74691406fa8ed7c0d9926359435c96be0f3641534ff7e78ad1a71fc3dad586d71aef1aca8475891a5df1a4990ab2cb1c1d8ab405ffbe1b625680a186","name":"HouseStateFirstPrefsByPollingPlaceDownload-27966-WA.csv","type":"text/csv","lastModified":1658731678258.434,"size":829368},{"id":"c0ed67d24772a23f1690bd9d9e2fcc008eb5d9d17d332d185cfcee618486017b17d697114bc913ad876ce72db68604f9d6c01421c82fd98065a22a2e845b38f7","href":"https://static.observableusercontent.com/files/c0ed67d24772a23f1690bd9d9e2fcc008eb5d9d17d332d185cfcee618486017b17d697114bc913ad876ce72db68604f9d6c01421c82fd98065a22a2e845b38f7","name":"HouseStateFirstPrefsByPollingPlaceDownload-27966-SA.csv","type":"text/csv","lastModified":1658731677837.022,"size":611591},{"id":"7b3ea584d23692ee12797481718139544edee96fb2053f9044633b764da92ce6577194f96e48a582914e7292880e57f28aed5d30069f060297d7f472645bbe75","href":"https://static.observableusercontent.com/files/7b3ea584d23692ee12797481718139544edee96fb2053f9044633b764da92ce6577194f96e48a582914e7292880e57f28aed5d30069f060297d7f472645bbe75","name":"HouseStateFirstPrefsByPollingPlaceDownload-27966-TAS.csv","type":"text/csv","lastModified":1658731677270.811,"size":272580},{"id":"26da127415d5f787c45ed7c9449b86066a004d39d4d3ec26315268a5655a6ae58dda32c36d51a4f7db2aba624f42676e7409768afdb8cb99e94ebb26f50bd286","href":"https://static.observableusercontent.com/files/26da127415d5f787c45ed7c9449b86066a004d39d4d3ec26315268a5655a6ae58dda32c36d51a4f7db2aba624f42676e7409768afdb8cb99e94ebb26f50bd286","name":"HouseStateFirstPrefsByPollingPlaceDownload-27966-ACT.csv","type":"text/csv","lastModified":1658731676429.734,"size":86531},{"id":"7455d9d10e9bbee14c8ff8485431859090a5a902b0af09d03d04b516a5999d358b249bcfde5cc209e5dbc4965c9e719bdcdc1bb2b6df1018f8de66e3ff2a0af9","href":"https://static.observableusercontent.com/files/7455d9d10e9bbee14c8ff8485431859090a5a902b0af09d03d04b516a5999d358b249bcfde5cc209e5dbc4965c9e719bdcdc1bb2b6df1018f8de66e3ff2a0af9","name":"HouseStateFirstPrefsByPollingPlaceDownload-27966-NT.csv","type":"text/csv","lastModified":1658731675870.882,"size":66237},{"id":"4c05b4e823c50572d7be20ea7ecebd5df3c33abbc6e7326d5353cb457dda8b1866d39265c9ff1765d608e4c9ab3225158ea917042d92472362de402f64f63c84","href":"https://static.observableusercontent.com/files/4c05b4e823c50572d7be20ea7ecebd5df3c33abbc6e7326d5353cb457dda8b1866d39265c9ff1765d608e4c9ab3225158ea917042d92472362de402f64f63c84","name":"GeneralPollingPlacesDownload-27966.csv","type":"text/csv","lastModified":1658731576916.207,"size":1091633}] 30:{"id":"64faaf59581cecfb","slug":"2019-2022-australian-federal-election-swings","title":"2019/2022 Australian federal election House of Representatives polling booth swings","thumbnail":"b6ffc114b7b44899a8e88e8f938c4d2dda8b2ecd2f3c64e084f82a0ccbce55a1","access_level":"public","create_time":"$D2022-05-04T19:16:16.262Z","update_time":"$D2023-10-11T07:28:38.693Z","view_time":null,"first_public_time":"$D2022-05-09T13:28:04.849Z","has_unpublished_edits":null,"fork":false,"stars":5,"starred":false,"owner":{"type":"team","id":"cc48459e4293f942","login":"mjbo","name":"Max Bo","avatar_url":"https://avatars-next.observableusercontent.com/05ae9baba40510a4a22fa7d179f29dd4ffd85fcff859c54a31d42e166ae61dfa","tier":"starter_2024","bio":"Software Engineer @ Canva, ex-Google | music, color theory, Australian democracy, situated software & generative art"},"version":2462,"publish_version":null,"role":null,"authored":false,"authors":[{"type":"individual","id":"5bb83a6e9493ea1d","login":"mjbo","name":"Max Bo","avatar_url":"https://avatars-next.observableusercontent.com/05ae9baba40510a4a22fa7d179f29dd4ffd85fcff859c54a31d42e166ae61dfa","tier":null,"bio":"Software Engineer @ Meta | music, color theory, Australian democracy, situated software & generative art"}],"members":[{"type":"individual","id":"5bb83a6e9493ea1d","login":"mjbo","name":"Max Bo","avatar_url":"https://avatars-next.observableusercontent.com/05ae9baba40510a4a22fa7d179f29dd4ffd85fcff859c54a31d42e166ae61dfa","tier":null,"role":"editor"}],"comments":[{"id":"56960bcdb31651b2","reply_to_id":null,"content":"Would be great to have the option to cluster these onto a single group to see the clusters within a seat. For example, the swings in seats with Teal candidates and how that affected the liberal or green vote.","create_time":"$D2022-07-25T07:05:46.164Z","update_time":null,"resolved":false,"user":{"type":"individual","id":"fe552fca829a8ad1","login":"jdcaperon","name":"Jack Caperon","avatar_url":"https://avatars-next.observableusercontent.com/b1e41b301bb52aeeffa13f134b3c6735b4d25dbcabde3f999e8b380aa17d71f6","tier":null}}],"custom_thumbnail":true,"trashed":false,"lapsed":null,"subscribed":null,"forks":2,"collection":{"id":"4ed9baa9c017e827","slug":"auspol","title":"auspol","owner":{"id":"cc48459e4293f942","login":"mjbo","name":"Max Bo"}},"type":"notebook","body":{"titling":"auto","title":"2019/2022 Australian federal election House of Representatives polling booth swings","cells":[{"id":0,"value":"# 2019/2022 Australian federal election _House of Representatives_ polling booth swings","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":753,"value":"$32","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1193,"value":"*I offer my sincere apologies for the poor performance of some of these graphics. I have tried my best to optimise them, but there is still more work to be done*.","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":2390,"value":"viewof enableTooltips = Inputs.toggle({\n label: \"Enable tooltips (can crash mobile)\",\n value: true\n})","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1428,"value":"viewof selectedElection = {\n const year2022 = {\n year: 2022,\n majorPartyFirstPreference: majorPartyFirstPreference2022,\n twoCandidatePreferred: twoCandidatePreferred2022,\n divisions: divisions2022,\n divisionGeojson: divisionGeojson2022\n };\n\n const year2019 = {\n year: 2019,\n majorPartyFirstPreference: majorPartyFirstPreference2019,\n twoCandidatePreferred: twoCandidatePreferred2019,\n divisions: divisions2019,\n divisionGeojson: divisionGeojson2019\n };\n\n return Inputs.radio(\n new Map([\n [\"2022\", year2022],\n [\"2019\", year2019]\n ]),\n { value: year2022, label: \"Election\" }\n );\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":276,"value":"## First preference swings","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1058,"value":"viewof searchedDivisions = Inputs.search(\n selectedElection.majorPartyFirstPreference,\n {\n label: \"Filter by division or state\",\n columns: [\"DivisionNm_1\", \"StateAb\"],\n datalist: [...STATES, ...selectedElection.divisions]\n }\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1740,"value":"### By division","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1834,"value":"_Plot intention_: To identify \"consequential swings\": swings at booths that resulted in large gains or losses of votes, indicated by larger arrows & identify \"outlier booths\": booths that swung against the rest of the electorate, indicated by arrows not part of the standard cluster","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":594,"value":"$33","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1744,"value":"### By income","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1846,"value":"_Plot intention_: To identify the extent to which a booth's suburb's median and average income predict a swing for a given party","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1749,"value":"viewof incomeMetric = Inputs.radio([\"Median income\", \"Average income\"], {\n value: \"Median income\",\n label: \"Income metric\"\n})","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1802,"value":"viewof facetByGroup = Inputs.toggle({ label: \"Facet by group\", value: true })","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1763,"value":"viewof facetByState = Inputs.toggle({ label: \"Facet by state\", value: true })","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1670,"value":"$34","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":635,"value":"### By location","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1840,"value":"_Plot intention_: To identify geographic features that influence swing magnitude","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1458,"value":"viewof firstPreferenceSettings = makeMapSettings()","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":531,"value":"_Scroll to zoom, Command + Shift + click to pan and rotate. **You may need to zoom at least once before arrows appear.**_","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1519,"value":"Plot.legend({\n color: makePartyScale(selectedElection.majorPartyFirstPreference)\n})","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":428,"value":"firstPreferenceDeckMap = {\n await visibility();\n return plotDeckMap({\n data: selectedElection.majorPartyFirstPreference,\n getArrowLength: firstPreferenceStaticMap.scale(\"length\").apply,\n showNegativeSwings: firstPreferenceSettings.showNegativeSwings,\n scaleBooth: firstPreferenceSettings.scaleBooth\n });\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":262,"value":"## Two-candidate-preferred swings by location","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1501,"value":"viewof twoCandidatePreferredSettings = makeMapSettings()","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1532,"value":"Plot.legend({ color: makePartyScale(selectedElection.twoCandidatePreferred) })","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":431,"value":"twoCandidatePreferredDeckMap = {\n return plotDeckMap({\n data: selectedElection.twoCandidatePreferred,\n getArrowLength: twoCandidatePreferredStaticMap.scale(\"length\").apply,\n showNegativeSwings: twoCandidatePreferredSettings.showNegativeSwings,\n scaleBooth: twoCandidatePreferredSettings.scaleBooth\n });\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":564,"value":"---","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":6,"value":"## Implementation","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1361,"value":"- [2019 House of Representatives data](https://results.aec.gov.au/24310/Website/HouseDownloadsMenu-24310-Csv.htm)\n- [2022 House of Representatives data](https://results.aec.gov.au/27966/Website/HouseDownloadsMenu-27966-Csv.htm)","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1704,"value":"### Income data","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":2009,"value":"[Median and average taxable income by state/territory and postcode, 2003–04 and 2013–14 to 2016–17 income years](https://data.gov.au/data/dataset/taxation-statistics-2016-17/resource/8a7bfe9e-ad35-4a0a-be52-52058fea1bca?view_id=a0b951d2-d783-4d35-8ec8-5bea85713820) is the latest I could find.","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1622,"value":"incomeBySuburb2017 = aq\n .fromCSV(\n await FileAttachment(\"8a7bfe9e-ad35-4a0a-be52-52058fea1bca.csv\").text()\n )\n .select(\n \"Postcode2\",\n // yes, those are newlines in the field names. Thanks for nothing ABS.\n `Median3 taxable income 2016-17\n$`,\n `Average3 taxable income 2016-17\n$`\n )\n .rename(aq.names([\"PostCode\", \"MedianIncome\", \"AverageIncome\"]))\n .derive({\n MedianIncome: (d) => aq.op.parse_float(d.MedianIncome),\n AverageIncome: (d) => aq.op.parse_float(d.AverageIncome)\n })\n// .objects() // Uncomment to return an array of objects","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":101,"value":"### Polling place data","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":2013,"value":"The AEC's CSV's have a metadata line at the top of the file that we have to strip, otherwise CSV parsers will try and treat the 0th line as the column name listing. ","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1926,"value":"/**\n * Helper method for cleaning AEC CSVs.\n */\nasync function cleanAecCsv(file) {\n // strip metadata on the 0th row\n const text = await file.text();\n const cleaned = text.split(\"\\n\").slice(1).join(\"\\n\");\n\n // cram into Aquero\n return aq.fromCSV(cleaned);\n}","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1311,"value":"STATES = [\"NSW\", \"VIC\", \"QLD\", \"WA\", \"SA\", \"TAS\", \"ACT\", \"NT\"]","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2015,"value":"Here we join in the income data we collected before and associate it with each polling booth location. ","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1925,"value":"pollingPlaces2019 = (await cleanAecCsv(\n await FileAttachment(\"GeneralPollingPlacesDownload-24310@1.csv\")\n)).join(incomeBySuburb2017, [\"PremisesPostCode\", \"PostCode\"])","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1380,"value":"pollingPlaces2022 = (\n await cleanAecCsv(\n await FileAttachment(\"GeneralPollingPlacesDownload-27966.csv\")\n )\n).join(incomeBySuburb2017, [\"PremisesPostCode\", \"PostCode\"])","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1854,"value":"### Division data","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":2407,"value":"From https://raw.githubusercontent.com/pmcau/AustralianElectorates/main/Data/Maps/2019/australia_20.geojson","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":2401,"value":"divisionGeojson2019 = FileAttachment(\"australia_20.geojson\").json()","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1860,"value":"// no redrawings that I know of\ndivisionGeojson2022 = divisionGeojson2019","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1391,"value":"getDivisions = (pollingPlaces) => [\n ...pollingPlaces.groupby(\"DivisionNm\").rollup().values(\"DivisionNm\")\n]","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1079,"value":"divisions2019 = getDivisions(pollingPlaces2019)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1388,"value":"divisions2022 = getDivisions(pollingPlaces2022)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1711,"value":"### First preference data","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":1944,"value":"nsw2019 = cleanAecCsv(await FileAttachment(\"HouseStateFirstPrefsByPollingPlaceDownload-24310-NSW.csv\"))","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1949,"value":"vic2019 = cleanAecCsv(await FileAttachment(\"HouseStateFirstPrefsByPollingPlaceDownload-24310-VIC.csv\"))","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1980,"value":"qld2019 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-24310-QLD.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1950,"value":"wa2019 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-24310-WA.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1947,"value":"sa2019 = cleanAecCsv(await FileAttachment(\"HouseStateFirstPrefsByPollingPlaceDownload-24310-SA.csv\"))","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1948,"value":"tas2019 = cleanAecCsv(await FileAttachment(\"HouseStateFirstPrefsByPollingPlaceDownload-24310-TAS.csv\"))","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1941,"value":"act2019 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-24310-ACT.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1946,"value":"nt2019 = cleanAecCsv(await FileAttachment(\"HouseStateFirstPrefsByPollingPlaceDownload-24310-NT.csv\"))","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1937,"value":"mergeFirstPreferenceTables = async (tables) => {\n const australiaTable = tables.reduce((a, b) => a.concat(b));\n\n return (\n australiaTable\n .join(pollingPlaces2019, [\"PollingPlaceID\"])\n // cull outliers with data assertions\n .filter((d) => d.Latitude < 90)\n .filter((d) => 0 < d.Longitude)\n .derive({\n Group: (d) => {\n switch (d.PartyAb) {\n case \"CLP\":\n case \"LNP\":\n case \"LP\":\n case \"NP\":\n return \"Coalition\";\n case \"ALP\":\n return \"ALP\";\n case \"GRN\":\n return \"GRN\";\n }\n return \"Minor party / independent\";\n }\n })\n );\n}","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1310,"value":"firstPreference2019 = mergeFirstPreferenceTables([\n nsw2019,\n vic2019,\n qld2019,\n wa2019,\n sa2019,\n tas2019,\n act2019,\n nt2019\n])","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":651,"value":"majorPartyFirstPreference2019 = firstPreference2019\n .params({ MAJOR_PARTY_COLORS })\n .filter((d) => !!MAJOR_PARTY_COLORS[d.PartyAb])","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2084,"value":"act2022 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-27966-ACT.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2085,"value":"nsw2022 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-27966-NSW.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2086,"value":"nt2022 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-27966-NT.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2087,"value":"qld2022 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-27966-QLD.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2088,"value":"sa2022 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-27966-SA.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2089,"value":"tas2022 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-27966-TAS.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2090,"value":"vic2022 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-27966-VIC.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2091,"value":"wa2022 = cleanAecCsv(\n await FileAttachment(\n \"HouseStateFirstPrefsByPollingPlaceDownload-27966-WA.csv\"\n )\n)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1410,"value":"firstPreference2022 = mergeFirstPreferenceTables([\n nsw2022,\n vic2022,\n qld2022,\n wa2022,\n sa2022,\n tas2022,\n act2022,\n nt2022\n])","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1418,"value":"majorPartyFirstPreference2022 = firstPreference2022\n .params({ MAJOR_PARTY_COLORS })\n .filter((d) => !!MAJOR_PARTY_COLORS[d.PartyAb])","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1715,"value":"### Two candidate preferred data","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":133,"value":"twoCandidatePreferred2019 = (\n await cleanAecCsv(\n await FileAttachment(\n \"HouseTcpByCandidateByPollingPlaceDownload-24310@1.csv\"\n )\n )\n)\n .join(pollingPlaces2019, \"PollingPlaceID\")\n // cull outliers with data assertions\n .filter((d) => d.Latitude < 90)\n .filter((d) => 0 < d.Longitude)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1421,"value":"twoCandidatePreferred2022 = (\n await cleanAecCsv(\n await FileAttachment(\"HouseTcpByCandidateByPollingPlaceDownload-27966.csv\")\n )\n)\n .join(pollingPlaces2019, \"PollingPlaceID\")\n // cull outliers with data assertions\n .filter((d) => d.Latitude < 90)\n .filter((d) => 0 < d.Longitude)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":547,"value":"### Party metadata","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":351,"value":"culori = import(\"https://unpkg.com/culori@2.0.0/bundled/culori.min.mjs?module\")","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2017,"value":"These colors were extracted from the Wikipedia page [2022 Australian federal election](https://en.wikipedia.org/wiki/2022_Australian_federal_election) with some minor tweaks to improve contrast against a white background.","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":230,"value":"MAJOR_PARTY_COLORS = ({\n ALP: \"#DE3533\",\n CLP: \"#f8981d\",\n GRN: \"#10C25B\",\n IND: \"#888888\",\n KAP: \"#b50204\",\n LNP: \"#1456F1\",\n LP: \"#0047AB\",\n NP: \"#007700\",\n ON: \"#f36c21\",\n UAPP: \"#ccbe00\",\n XEN: \"#000000\",\n Coalition: \"#1456F1\" // same as LNP\n})","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":358,"value":"culori.parse(MAJOR_PARTY_COLORS[\"ALP\"])","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":858,"value":"function partyAbbreviation(abbr) {\n return html`${abbr}`;\n}","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":864,"value":"partyAbbreviation(\"ALP\")","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":975,"value":"makePartyScale = (data) => {\n // This is a bit of a gnarly hack to set custom categorical colors\n // If there's a better way then I'd love to hear it\n const plot = Plot.plot({\n marks: [\n Plot.tickX(selectedElection.majorPartyFirstPreference, {\n stroke: (d) => d.PartyAb\n })\n ]\n });\n\n const scale = plot.scale(\"color\");\n scale.range = scale.domain.map((d) => MAJOR_PARTY_COLORS[d]);\n\n return scale;\n}","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":572,"value":"### Plot implementation","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":243,"value":"import { addTooltips } from \"@mkfreeman/plot-tooltip\"","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1905,"value":"getPartyColor = (d) => {\n const { r, g, b } = culori.parse(MAJOR_PARTY_COLORS[d.PartyAb]);\n return [r * 255, g * 255, b * 255];\n}","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":368,"value":"function getTooltip(d) {\n return `${d.Swing}% ${d.Swing > 0 ? \"to\" : \"from\"} ${d.GivenNm} ${\n d.Surname\n } (${d.PartyAb})\n Division: ${d.DivisionNm_1} (${d.PremisesStateAb})\n Votes at polling place for candidate: ${d.OrdinaryVotes}\n Elected?: ${d.Elected}\n Previously elected?: ${d.HistoricElected}\n Median income: $${d.MedianIncome}\n Average income: $${d.AverageIncome}`;\n}","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":161,"value":"$35","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":424,"value":"$36","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":302,"value":"import { mapboxgl, deck } from \"@johnhaldeman/tutorial-on-deckgl\"","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":1488,"value":"makeMapSettings = () =>\n Inputs.form({\n showNegativeSwings: Inputs.toggle({\n label: \"Show negative swings\",\n value: false\n }),\n scaleBooth: Inputs.select(\n new Map(\n [\n [\"Arrow size proportional to swing magnitude at booth\", false],\n [\"Arrow size proportional to votes gained or lost at booth\", true]\n ],\n { value: false, label: \"Arrow sizing scheme\" }\n )\n )\n })","pinned":true,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":2019,"value":"Plot has a more coherent mark sizing algorithm, so we render them here, and extract out the rendered sizes for use in the Deck.gl map. ","pinned":false,"hidden":false,"mode":"md","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"","database":"$undefined"},{"id":2354,"value":"import { land } from \"@observablehq/plot-projections\"","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":267,"value":"firstPreferenceStaticMap = {\n return plotMap({\n data: selectedElection.majorPartyFirstPreference,\n showNegativeSwings: firstPreferenceSettings.showNegativeSwings,\n scaleBooth: firstPreferenceSettings.scaleBooth\n });\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"},{"id":283,"value":"twoCandidatePreferredStaticMap = {\n return plotMap({\n data: selectedElection.twoCandidatePreferred,\n showNegativeSwings: twoCandidatePreferredSettings.showNegativeSwings,\n scaleBooth: twoCandidatePreferredSettings.scaleBooth\n });\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","providerMetadata":"$undefined","attachments":"$undefined","output":"$undefined","database":"$undefined"}],"files":"$W37","stdlib":"1"}} 31:"$30:body" 2c:E{"digest":"NEXT_REDIRECT;replace;/@mjbo/2019-2022-australian-federal-election-swings;307;"}