Peguei nas sondagens publicadas em Abril de 2025.
No total, estas sondagens somam 3480 respostas sendo que 4,7% não conseguiram disser em que partido vão votar. Não inclui a sondagem da Consulmark2 porque não encontrei o tamanho da amostra.
Resultados (intervalo de confiança de 95%)
AD = 77 a 85 deputados (média de 81)
PS = 72 a 80 deputados (média de 76)
CHEGA = 39 a 46 deputados (média de 43)
IL = 11 a 16 deputados (média de 13.5)
BE = 2 a 6 deputados (média de 4)
PCP = 3 a 6 deputados (média de 4.5)
LIVRE = 6 a 11 deputados (média de 8.5)
PAN = 0 a 1 deputados (média de 0.3)
AD e PS estão empatados mas pouco.
Apesar de a AD e o PS estarem empatados para um intervalo de confiança de 95%, a probabilidade de o PS ficar à frente da AD é de apenas 10%.
Para os mais interessados
Indico o artigo onde podem ver a fundamentação estatística para os intervalos de confiança (a 95%).
Vieira, PCC (2025), Inferência estatística vetorial -Sondagens eleitorais, Researchgate
O código R usado no cálculo
AD=0
PS=0
CHEGA=0
IL=0
BE=0
PCP=0
Livre=0
PAN=0
for(i in 1:100000)
{#sondagens
agregado =sample(1:9,3480,rep=TRUE,prob=c(29.9, 28.2,16.7,6.7,3.4,3.6,5.0,1.8,4.7))
#Calcula os deputados
partidos=table(agregado)[-9]
percentagem=partidos/sum(partidos)
deputados=296*percentagem - 6.44
deputados[deputados<0]=0
deputados=round(deputados/sum(deputados)*230,0)
#AD PS Chega IL BE CDU Livre PAN ND
AD[i]=deputados[1]
PS[i]=deputados[2]
CHEGA[i]=deputados[3]
IL[i]=deputados[4]
BE[i]=deputados[5]
PCP[i]=deputados[6]
Livre[i]=deputados[7]
PAN[i]=deputados[8]
}
x=sort(AD)
c(x[500], x[2500], mean(AD), x[97500],x[99500])
x=sort(PS)
c(x[500],x[2500], mean(PS), x[97500],x[99500])
x=sort(CHEGA)
c(x[500],x[2500], mean(CHEGA), x[97500],x[99500])
x=sort(IL)
c(x[500],x[2500], mean(IL), x[97500],x[99500])
x=sort(BE)
c(x[500],x[2500], mean(BE), x[97500],x[99500])
x=sort(PCP)
c(x[500],x[2500], mean(PCP), x[97500],x[99500])
x=sort(Livre)
c(x[500],x[2500], mean(Livre),x[97500],x[99500])
x=sort(PAN)
c(x[500],x[2500],mean(PAN),x[97500],x[99500])
x=sort(PS+BE+PCP+Livre)
c(x[500], x[2500], mean(x), x[97500],x[99500])
x=sort(AD+IL)
c(x[500], x[2500], mean(x), x[97500],x[99500])
x=sort(AD+CHEGA)
c(x[500], x[2500], mean(x), x[97500],x[99500])
#AD>PS
(sum((AD>PS)*1)+sum((AD==PS)*0.5))/100000
0 comentários:
Enviar um comentário