if (FALSE) {
path <- file.path(tempdir(), "pib_per_capita.csv")
bare_query <- "SELECT *
FROM basedosdados.br_tse_eleicoes.bens_candidato
WHERE ano = 2020
AND sigla_uf = \'TO\'"
download(query = bare_query, path = path)
# or download the entire table
download(table = "br_tse_eleicoes.bens_candidato", path = path)
}
Run the code above in your browser using DataLab