jrhumberto

# Os dados estão presentes no repositório big query da base dos dados

SELECT id_municipio,
       count(*) as quantidade_nivel_superior,
       ( select count(*)
           from `basedosdados.br_me_rais.microdados_vinculos` vinc_sub
          where vinc_sub.id_municipio = vinc.id_municipio and
                ano = 2023 and
                vinculo_ativo_3112 ="1" and
                natureza_juridica = "1244") as total_servidores_municipio, #1244= município 

jrhumberto

jrhumberto

PostgreSQL is Enough

• Simplify: move code into database functions
• Just Use Postgres for Everything
• Just use Postgres
• PostgreSQL is the worlds’ best database
• Postgres is eating the database world
• Hacker News discussion

Background and Cron Jobs

jrhumberto

####Aqui a função
processa_ws_sp_chamada<- function(ano, 
                          codOrgao = "Detalhado", #Consolidado/Detalhado/<Código>	
                          CodFonte = "Detalhado", #Consolidado/Detalhado/<Código>	
                          CodFuncao="Detalhado", #Consolidado/Detalhado/<Código>
                          CodGrupo="Todos", #Todos/<Código>
                          CodModalidade = "Todos")#Todos/<Código>  
  {
  # Carregar o pacote necessário

jrhumberto

# MPE  UFC 2024/2
# Autor: Humberto Bezerra de Meneses Júnior
# Data: 27/11/2024
# --------------------------------------------------------------------

# Definir o diretório de trabalho - no R é assim
# setwd("C:/Users/<CAMINHO DO ARQUIVO>/dados_ceara.xlsx")
# getwd() # Verificar o diretório atual

# Carregar as bibliotecas necessárias

jrhumberto

apple_screenshot <- function(file = tempfile(fileext = ".png")) {
  cmd <- sprintf("screencapture -xC %s", file)
  system(cmd)
  invisible(file)
}

apple_keystroke <- function(x) {
  cmd <- sprintf(
    "osascript -e 'tell application \"System Events\" to keystroke \"%s\"'",
    x

jrhumberto

See also:

• Free backend hosting
• https://free-for.dev/#/?id=dbaas

Service	Type	Storage	Limitations
Amazon DynamoDB	⚠️ Proprietary NoSQL	25 GB	⚠️ Payment method required
Amazon RDS	⚠️ Proprietary RDBMS		⚠️ Only free for 1 year
Azure SQL Database	MS SQL Server		⚠️ Only free for 1 year
👉 Clever Cloud	PostgreSQL, MySQL, MongoDB, Redis	256 MB (PostgreSQL)	Max 5 connections (PostgreSQL)

jrhumberto

jrhumberto

library(ipeadatar)
library(tidyverse)
library(readxl)

series_disponiveis<-
  ipeadatar::available_series()


codigos<-
  ((series_disponiveis %>%

jrhumberto