API do TSE: como pegar o resultado da eleição em JSON

Copiar# Resultado oficial da eleição de 2026 direto da API JSON do TSE (só biblioteca padrão)
import json, urllib.request

BASE = "https://resultados.tse.jus.br/oficial/ele2026"
ELEICAO = 6258  # presidente: 6257 = 1º turno, 6258 = 2º turno

def tse(caminho):
    req = urllib.request.Request(f"{BASE}/{caminho}", headers={"User-Agent": "estudo-dados-tse/1.0"})
    with urllib.request.urlopen(req, timeout=30) as r:
        return json.load(r)

def resultado(uf="br", municipio=""):
    """uf='br' para o país; uf='sp', municipio='71072' para a cidade de São Paulo."""
    d = tse(f"{ELEICAO}/dados/{uf}/{uf}{municipio}-c0001-e{ELEICAO:06d}-u.json")
    cands = sorted((c for agr in d["carg"][0]["agr"] for par in agr["par"] for c in par["cand"]), key=lambda c: int(c["n"]))
    return {
        "atualizado": f'{d["dg"]} {d["hg"]}',
        "secoes_totalizadas": f'{d["s"]["st"]} de {d["s"]["ts"]}',
        "comparecimento": int(d["e"]["c"]),
        "votos": {f'{c["n"]} {c["nmu"]}': int(c["vap"]) for c in cands},
    }

# Lista de municípios: código TSE (5 dígitos), código IBGE (7) e nome
cfg = tse(f"{ELEICAO}/config/mun-e{ELEICAO:06d}-cm.json")
municipios = [(uf["cd"], m["cd"], m["cdi"], m["nm"]) for uf in cfg["abr"] for m in uf["mu"]]
print(len(municipios), "municípios e localidades; ex.:", municipios[0])

print(resultado())                 # Brasil
print(resultado("sp", "71072"))    # São Paulo (SP)

Copiar# Resultado oficial da eleição de 2026 direto da API JSON do TSE (pacote jsonlite)
library(jsonlite)

base <- "https://resultados.tse.jus.br/oficial/ele2026"
eleicao <- 6258L  # presidente: 6257 = 1º turno, 6258 = 2º turno

resultado <- function(uf = "br", municipio = "") {
  url <- sprintf("%s/%d/dados/%s/%s%s-c0001-e%06d-u.json", base, eleicao, uf, uf, municipio, eleicao)
  d <- fromJSON(url, simplifyVector = FALSE)
  cands <- list()
  for (a in d$carg[[1]]$agr) for (p in a$par) cands <- c(cands, p$cand)
  r <- data.frame(numero = as.integer(sapply(cands, `[[`, "n")),
                  nome   = sapply(cands, `[[`, "nmu"),
                  votos  = as.numeric(sapply(cands, `[[`, "vap")))
  r[order(r$numero), ]
}

resultado()                 # Brasil
resultado("sp", "71072")    # São Paulo (SP)

O código em R usa os pacotes jsonlite e data.table (install.packages(c("jsonlite", "data.table"))).