Published
Edited
Jun 18, 2021
viewof chartTour1 = hypotheseChart(t1Hypothese, "Premier tour")
// d3.selectAll('svg rect').attr('width', 10)
viewof chartTour1_styled = html`<div class="custom">${hypotheseChart(t1Hypothese, "Premier tour")}<style>
svg { font-family: georgia !important; font-size:11px !important}
svg.plot g:first-child text { font-size: 13px; font-weight:bold}
.observablehq>style:only-child:before {display:none !important}</style>`
t1Hypothese.tetes_liste
styleIt = html`<style>
svg { font-family: georgia !important; font-size:11px !important}
svg.plot g:first-child text { font-size: 13px; font-weight:bold}
.observablehq>style:only-child:before {display:none !important}
</style>`
tParser = d3.timeParse("%Y-%m-%d")
niceDates = (s) => {
let l = s.split('-')
return l[2] + '/' + l[1]
}
hypotheseChart(t2Hypothese, "Deuxième tour")
import { sondages, regions, desc } from '@taniki/regionales2021-donnees-nsppolls'
regions
regionSondages = sondages.filter(i => i.region == regionSelect)
premierTour = tourSondages(regionSondages, 'Premier tour')
Inputs.table(secondTour)
secondTour = tourSondages(regionSondages, 'Deuxième tour')
tourSondages = (sondages, tour) => {
return sondages
.map(s => [s, s.tours.find(t => t.tour == tour)])
.map(([s, x]) => x?.hypotheses.map(h => ({sondage: s.id, date: s.fin_enquete, n: h.sous_echantillon, ...h})))
.filter(r => r != undefined)
.flat()
}
t1TetesListe = tetesListeRegion('Premier tour')
tetesListeRegion = (tour) => {
let data = [ ...new Set(
tourSondages(regionSondages, tour)
.map(x => x.tetes_liste)
.flat()
.map(t => t.tete_liste)
.filter(t => t != null)
)]
.map(t => [t, candidates.find(c => t.toLowerCase() == `${c['Prénom candidat']} ${c['Nom candidat']}`.toLowerCase() && c['Tête de Liste'] == 'Oui')])
.filter(t => t[1] != undefined )
.map(t => ({ 'name': t[0], info: t[1] }))
return data
}
t2TetesListe = tetesListeRegion('Deuxième tour')
// intentions = (sondages) =>
t1Intentions = premierTour
.map(t => t.tetes_liste.map(tl => ({sondage: t.sondage, date: t.date, n: t.sous_echantillon, hypothese: t.hypothese, ...tl})))
.flat()
.filter(t => t1TetesListe.map(t => t.name).includes(t.tete_liste))
.sort((a,b) => b.date.localeCompare(a.date))
t1Moyennes = [ ...d3.group(t1Intentions, i => i['tete_liste'])]
.map(t => {
let n = d3.sum(t[1], i => i.n)
let p = d3.sum(t[1], i => i.intentions * i.n) / n
let Z = jStat.normal.inv((1+0.95)/2, 0, 1)
let e = Z * Math.sqrt(((p/100) * (1 - (p/100))) / n)
return {
name: t[0],
mean: p,
n,
inf: d3.sum(t[1], i => i.erreur_inf * i.n) / d3.sum(t[1], i => i.n),
sup: d3.sum(t[1], i => i.erreur_sup * i.n) / d3.sum(t[1], i => i.n),
inf2: p - e*100,
sup2: p + e*100,
}
})
Inputs.table(t2Intentions)
t2Intentions = secondTour
.map(t => t.tetes_liste.map(tl => ({sondage: t.sondage, date: t.date, n: t.sous_echantillon, hypothese: t.hypothese, ...tl})))
.flat()
.filter(t => t2TetesListe.map(t => t.name).includes(t.tete_liste))
.sort((a,b) => b.date.localeCompare(a.date))
Inputs.table(t2Moyennes)
t2Moyennes = [ ...d3.group(t2Intentions, i => i['tete_liste'])]
.map(t => {
let n = d3.sum(t[1], i => i.n)
let p = d3.sum(t[1], i => i.intentions * i.n) / n
let Z = jStat.normal.inv((1+0.95)/2, 0, 1)
let e = Z * Math.sqrt(((p/100) * (1 - (p/100))) / n)
return {
name: t[0],
mean: p,
n,
inf: d3.sum(t[1], i => i.erreur_inf * i.n) / d3.sum(t[1], i => i.n),
sup: d3.sum(t[1], i => i.erreur_sup * i.n) / d3.sum(t[1], i => i.n),
inf2: p - e*100,
sup2: p + e*100,
}
})
import { raw as candidates, desc as descMinInt } from '@taniki/regionales2021-donnees-minint'
nuance = (c, name = 'tete_liste') => {
let found = candidates.find(x => `${x['Prénom candidat']} ${x['Nom candidat']}`.toLowerCase() == c[name].toLowerCase())
if (found) return found['Nuance candidat']
else if (c[name] == 'Fabienne Grébert') return 'ECO'
else if (c[name] == 'Aleksandar Nikolik') return 'RN'
else if (c[name] == 'Eric Pecqueur') return 'EXG'
else if (c[name] == 'Jean-Pierre Marchaud') return 'ECO'
else if (c[name] == 'Joseph Rivière') return 'RN'
else if (c[name] == 'Jean-Yves Payet') return 'EXG'
else if (c[name] == 'Jérémy Clément et Christelle de Crémiers') return 'DIV'
else return ''
}
candidates.find(x => `${x['Prénom candidat']} ${x['Nom candidat']}`.toLowerCase() == 'Éric PECQUEUR'.toLowerCase().normalize("NFD").replace(/[\u0300-\u036f]/g, ""))
candidates.filter(x => `${x['Prénom candidat']} ${x['Nom candidat']}`.toLowerCase() == 'Jean-Pierre Marchau'.toLowerCase())
candidates.filter(x => `${x['Nom candidat']}`.toLowerCase() == 'Marchand'.toLowerCase().normalize("NFD").replace(/[\u0300-\u036f]/g, ""))
// import {desc as descColors } from '@taniki/regionales2021-colors'
import {candidateColors, desc as descColors } from '@taniki/regionales2021-colors'
jStat = require('jstat')
Purpose-built for displays of data
Observable is your go-to platform for exploring data and creating expressive data visualizations. Use reactive JavaScript notebooks for prototyping and a collaborative canvas for visual data exploration and dashboard creation.
