Noções Básicas de Técnicas Contábeis e Financeiras com o R

CINCO - I Congresso Interinstitucional de Contabilidade e Controladoria

Kléber Formiga Miranda (UFERSA)

2023-12-14

Contabilidade e os Dados

A contabilidade evoluiu de métodos manuais para a incorporação da Análise de Dados, uma habilidade crucial, à medida que as empresas a integram em seus modelos de negócios para obter uma vantagem competitiva.

Sugestão de leitura

Edição especial da revista GV Executivo

V. 22 N. 3 (2023)

O FUTURO DAS FINANÇAS

O contador como decisor

(Machado & Miranda, 2023) - Acesse aqui

Maturidade Analítica

Dados contábeis

Como vemos os dados contábeis?

• Convencional
• Excel
• Temporal
• Dados

Vamos nos Familiarizar

Como manipular os dados em R?

• Planilha
• Vermelhas
• Laranja
• Amarelo
• Azul

dt_Planilha[1:11, 1:5]

# A tibble: 11 × 5
   CD_CVM DT_REFER   receitaBruta depreciacao valorAdicionado
   <chr>  <date>            <dbl>       <dbl>           <dbl>
 1 4537   2018-12-31    627053292    13227548       327076365
 2 5258   2018-12-31     15392699      414134         4727535
 3 6505   2018-12-31     29991000      332000         5929000
 4 8087   2018-12-31     20844147      935359         5300101
 5 8133   2018-12-31     10561696      314574         5229192
 6 9342   2018-12-31      2702055       28162          731981
 7 14826  2018-12-31     54111000      889000         9439000
 8 15083  2018-12-31        58886         871           20583
 9 20346  2018-12-31      4906638       33734         1053088
10 20494  2018-12-31       816240      109641          639243
11 20990  2018-12-31      8013261      435153         1286656

dt_Planilha$receitaBruta[1:11]

 [1] 627053292  15392699  29991000  20844147  10561696   2702055  54111000
 [8]     58886   4906638    816240   8013261

dt_Planilha$depreciacao[1]

[1] 13227548

dt_Planilha$depreciacao[dt_Planilha$CD_CVM == "4537" & dt_Planilha$DT_REFER == "2018-12-31"]

[1] 13227548

dt_Planilha$valorAdicionado[dt_Planilha$CD_CVM %in% c("4537", "5258", "6505") & dt_Planilha$DT_REFER == "2018-12-31"]

[1] 327076365   4727535   5929000

dadosAzul <- 
  dt_Planilha$valorAdicionado[dt_Planilha$CD_CVM %in% c("4537", "5258", "6505") & dt_Planilha$DT_REFER == "2018-12-31"]

mean(dadosAzul)

[1] 112577633

Vamos ao R