Type: | Package |
Title: | Analytical Procedures in Support of Brazilian Public Sector External Auditing |
Version: | 0.1.1 |
Author: | Bruno M. S. S. Melo |
Maintainer: | Bruno Melo <ctbrunomelo@gmail.com> |
Description: | Set of analytical procedures based on advanced data analysis in support of Brazil's public sector external control activity. |
Imports: | data.table, igraph, sqldf, visNetwork |
License: | GPL-2 | GPL-3 [expanded from: GPL (≥ 2)] |
URL: | http://github.com/brunomssmelo/RcextTools/ |
Encoding: | UTF-8 |
LazyData: | true |
RoxygenNote: | 6.0.1 |
NeedsCompilation: | no |
Packaged: | 2017-09-05 04:58:14 UTC; bruno |
Depends: | R (≥ 2.10) |
Repository: | CRAN |
Date/Publication: | 2017-09-05 05:04:20 UTC |
Identifica potenciais mercados de risco de praticas colusivas a partir de grafo de licitacoes
Description
Identifica potenciais mercados de risco de praticas colusivas a partir de grafo de licitacoes
Usage
TipologiaRodizio(dados, considerarDesconto = F)
Arguments
dados |
data.frame contendo as seguintes colunas:
|
considerarDesconto |
parametro do tipo |
Value
objeto S3 da classe TipologiaRodizio
, contendo os seguintes atributos:
-
mercados objeto do tipo
igraph::communities
contendo todos as comunidades (mercados) obtidas a partir do grafogrLicitacoes
; -
grafo grafo do tipo
igraph
contendo os mercados de risco presentes no grafomercados
; -
tabela objeto do tipo
data.frame
contendo informacoes dos contratos considerados como suspeitos. Dentre os campos nela presentes, destacamos:-
MERCADO_ATUACAO identificador do mercado a que o contrato pertence, relacionando-o ao atributo
mercados
; e -
PROB_FAVORECIMENTO_NO_MERCADO probabilidade, estimada com base no PageRank intracomunitario, de o contrato ter sido fruto de alguma acao colusiva naquele mercado especifico.
-
Author(s)
Bruno M. S. S. Melo
See Also
igraph
Examples
## Not run:
# carrega dados de licitacoes da base fornecida pelo pacote RcextTools
data("part_lic")
dtDados <- part_lic[!is.na(part_lic$COD_LICITACAO),]
dtDados <- data.frame(
CNPJ = dtDados$CNPJCPF_FORNECEDORES,
ID_LICITACAO = dtDados$COD_LICITACAO,
ID_ITEM = dtDados$ID_ITEM,
VENCEDOR = ifelse(dtDados$VENCEDOR == 'S', T, F),
VALOR_ESTIMADO = NA,
VALOR_HOMOLOGADO = as.numeric(dtDados$VALOR_FINAL),
DESC_OBJETO = dtDados$RESUMO_OBJETO,
stringsAsFactors = F
)
casosSuspeitos <- TipologiaRodizio(dtDados)
# imprime dataframe com resultados
print(casosSuspeitos)
# plota grafo
plot(casosSuspeitos)
## End(Not run)
Cria um grafo de vencedores e participantes de licitacoes publicas
Description
Utiliza-se um grafo direcionado para representar a relacao entre as empresas participantes das licitacoes, da seguinte forma:
cada empresa e representada por um no;
as empresas que participaram de um mesmo certame estarao associadas por relacoes do tipo “perdedor-vencedor”. Tal relacao e representada por uma aresta que se inicia em no representativo da empresa participante perdedora para um no representativo da licitante vencedora.
o desconto ofertado (diferenca entre o valor estimado e o valor homologado) podera influenciar, de forma inversamente proporcional, o peso das relacoes perdedor-vencedor. Quanto menor o desconto ofertado pelo vencedor, maior sera o peso da referida relacao.
Usage
TipologiaRodizioCriaGrafo(dados, tipoRetorno = 0, agregarArestas = T,
considerarDesconto = F)
Arguments
dados |
data.frame contendo as seguintes colunas:
|
tipoRetorno |
especifica o objeto a ser retornado pela funcao. As opcoes sao as que se seguem:
|
agregarArestas |
parametro do tipo |
considerarDesconto |
parametro do tipo |
Value
o retorno depende do valor especificado para o parâmetro tipoRetorno
.
Author(s)
Bruno M. S. S. Melo
See Also
igraph
Examples
## Not run:
grafoLic <- TipologiaRodizioCriaGrafo(dados = dfDadosLic, tipoRetorno = 0, considerarDesconto = F)
## End(Not run)
Identifica potencias mercados de risco de praticas colusivas a partir de grafo de licitacoes
Description
Identifica potencias mercados de risco de praticas colusivas a partir de grafo de licitacoes
Usage
TipologiaRodizioMetodologiaGrafo(grLicitacoes)
Arguments
grLicitacoes |
objeto do tipo |
Value
objeto do tipo environment, contendo os seguintes objetos:
-
cmMercados objeto do tipo
community
contendo todos as comunidades (mercados) obtidas a partir do grafogrLicitacoes
; -
grMercadosRisco grafo do tipo
igraph
contendo os mercados de risco extraidos do grafogrLicitacoes
; -
vcMercadosRisco vetor do tipo
numeric
contendo os identificadores dos mercados considerados de risco; -
vcEmpresasRisco vetor do tipo
numeric
contendo os identificadores dos mercados de risco a que pertencem as empresas consideradas suspeitas de praticarem acoes colusivas. As empresas sao identificadas pelo atributonames
.
Author(s)
Bruno M. S. S. Melo
See Also
igraph
Examples
## Not run:
grafoLic <- TipologiaRodizioMetodologiaGrafo(grLicitacoes)
## End(Not run)
Metodo S3 que retorna a representacao rm 'data.frame' de um objeto da classe TipologiaRisco
Description
Este metodo simplesmente retorna o atributo 'tabela' de um objeto da classe TipologiaRisco.
Usage
## S3 method for class 'TipologiaRodizio'
as.data.frame(x, ...)
Arguments
x |
objeto da classe 'TipologiaRodizio'. |
... |
eventuais argumentos adicionais. |
Author(s)
Bruno M. S. S. Melo
Examples
## Not run:
casosSuspeitos <- TipologiaRodizio(dados)
dfCasosSuspeitos <- as.data.frame.TipologiaRodizio(casosSuspeitos)
## End(Not run)
Dados de contratos relativos a base de licitacoes realizadas por orgaos de um ente federativo brasileiro no periodo de 2011 a 2015
Description
IMPORTANTE: Todos os campos que pudessem identificar o ente federativo, orgaos, empresas e certames tiveram seus valores alterados e embaralhados.
Usage
data(contratos)
Format
Um data frame contendo 127449 registros de 15 campos.
Details
contratos - Dados relativos aos contratos resultantes das licitacoes.
Um data frame contendo 127449 registros de 15 campos.
Os campos cujos valores foram alterados estao identificados por um asteristico (*):
SIGLA_UGR [*]
- Sigla da unidade gestora responsavel pelo certame.UGR [*]
- Descricao da unidade gestora responsavel pelo certame.TIPO_CONTRATACAO
- Tipo da contratacao.COD_LICITACAO [*]
- Codigo que identifica a licitacao na base de dados.NUMERO_CONTRATO [*]
- Numero do contrato.COD_ARTIGO
- Codigo identificador do artigo, que se refere a uma descricao generica universal do item contratado.ARTIGO
- Descricao generica universal do item contratado.ID_ITEM
- Identificador do item do objeto a que o participante concorre para fornecer.DESC_ITEM
- Descricao do item do objeto a que o participante concorre para fornecer.VALOR_INICIAL_CONTRATACAO
- Valor inicial do contrato.VALOR_FINAL_CONTRATACAO
- Valor final do contrato.CNPJ_FORNECEDOR [*]
- CNPJ do forncedor contratado.NOME_FORNECEDOR [*]
- Nome do forncedor contratado.DATA_INICIO_VIGENCIA
- Data do inicio da vigencia do contrato.DATA_FIM_VIGENCIA
- Data do final da vigencia do contrato.
Dados de licitacoes realizadas por orgaos de um ente federativo brasileiro no periodo de 2011 a 2015
Description
IMPORTANTE: Todos os campos que pudessem identificar o ente federativo, orgaos, empresas e certames tiveram seus valores alterados e embaralhados.
Usage
data(licitacoes)
Format
Um data frame contendo 8679 registros de 10 campos.
Details
Um data frame contendo 8679 registros de 10 campos.
Os campos cujos valores foram alterados estao identificados por um asteristico (*):
CNPJ_UGR [*]
- CNPJ da unidade gestora responsavel pelo certame.SIGLA_UGR [*]
- Sigla da unidade gestora responsavel pelo certame.COD_LICITACAO [*]
- Codigo que identifica a licitacao na base de dados.RESUMO_OBJ
- Descricao resumida do objeto da licitacao.VALOR_ESTIMADO
- Valor estimado do objeto.DATA_ABERT_SESSAO
- Data de abertura da sessão.STATUS_LICITACAO
- Status relativo a situacao do certame.TIPO_LICITACAO
- Tipo da licitacao.VALOR_TOTAL_HOMOLOGADO
- Valor final homologado para a totalidade do objeto sendo licitado.DATA_HOMOLOGACAO
- Data da homologacao do certame.
Dados relatvos aos participantes de licitacoes realizadas por orgaos de um ente federativo brasileiro no periodo de 2011 a 2015
Description
IMPORTANTE: Todos os campos que pudessem identificar o ente federativo, orgaos, empresas e certames tiveram seus valores alterados e embaralhados.
Usage
data(part_lic)
Format
Um data frame contendo 427242 registros de 13 campos.
Details
Um data frame contendo 427242 registros de 13 campos.
part_lic - Dados relativos aos participantes das licitacoes.
Os campos cujos valores foram alterados estao identificados por um asteristico (*):
COD_LICITACAO [*]
- Codigo que identifica a licitacao na base de dados.RESUMO_OBJETO
- Descricao resumida do objeto da licitacao.DESC_MODALIDADE
- Modalidade da licitacao.STATUS_LICITACAO
- Status relativo a situacao do certame.DATA_ABERTURA_SESSAO
- Data de abertura da sessão.DESC_UGR [*]
- Descricao da unidade gestora responsavel pelo certame.ID_ITEM
- Identificador do item do objeto a que o participante concorre para fornecer.CNPJCPF_FORNECEDORES [*]
- CNPJ ou CPF do participante do certame.NOME_FORNECEDORES [*]
- Nome do participante do certame.TIPO_PESSOA
- Tipo de pessoa em que o participante pode ser classificado (Fisica/Juridica).VALOR_FINAL
- Valor final homologado para o item do objeto a que o participante concorre para fornecer.VENCEDOR
- Flag que identifica se o participante foi ou nao vencedor no certame (S/N).MICRO_PEQUENA_EMPRESA
- Flag que identifica se o participante e ou nao micro empresa (S/N).
Metodo S3 que plota na tela uma representacao visual do grafo do tipo 'igraph' contido no objeto da classe 'TipologiaRodizio'
Description
Os diferentes agrupamentos representam empresas suspeitas de praticarem alguma acao colusiva num determinado mercado. As arestas apontam na direcao de um perdedor para um vencedor de licitacao. Empresas sao sempre perdedoras sao representadas por quadrados cinzas.
Usage
## S3 method for class 'TipologiaRodizio'
plot(x, ...)
Arguments
x |
objeto da classe 'TipologiaRodizio'. |
... |
eventuais parametros adicionais. |
Author(s)
Bruno M. S. S. Melo
Examples
## Not run:
casosSuspeitos <- TipologiaRodizio(dados)
plot(casosSuspeitos)
## End(Not run)
Metodo S3 que imprime na tela um data.frame que representa um objeto da classe 'TipologiaRodizio'
Description
Metodo S3 que imprime na tela um data.frame que representa um objeto da classe 'TipologiaRodizio'
Usage
## S3 method for class 'TipologiaRodizio'
print(x, ...)
Arguments
x |
objeto da classe 'TipologiaRodizio' |
... |
eventuais parametros adicionais. |
Author(s)
Bruno M. S. S. Melo
Examples
## Not run:
casosSuspeitos <- TipologiaRodizio(dados)
print(casosSuspeitos)
## End(Not run)
Cria um grafo de vencedores e participantes de licitacoes publicas
Description
Utiliza-se um grafo direcionado para representar a relacao entre as empresas participantes das licitacoes, da seguinte forma:
cada empresa e representada por um no;
as empresas que participaram de um mesmo certame estarao associadas por relacoes do tipo “perdedor-vencedor”. Tal relacao e representada por uma aresta que se inicia em no representativo da empresa participante perdedora para um no representativo da licitante vencedora.
o desconto ofertado (diferenca entre o valor estimado e o valor homologado) podera influenciar, de forma inversamente proporcional, o peso das relacoes perdedor-vencedor. Quanto menor o desconto ofertado pelo vencedor, maior sera o peso da referida relacao.
Usage
rcextCriaGrafoLic(dados, tipo_retorno = 0, agregar_arestas = T,
considerar_desconto = F)
Arguments
dados |
data.frame contendo as seguintes colunas:
|
tipo_retorno |
especifica o objeto a ser retornado pela funcao. As opcoes sao as que se seguem:
|
agregar_arestas |
parametro do tipo |
considerar_desconto |
parametro do tipo |
Value
o retorno depende do valor especificado para o parâmetro tipo_retorno
.
Author(s)
Bruno M. S. S. Melo
See Also
igraph
Examples
## Not run:
grafoLic <- rcextCriaGrafoLic(dados = dfDadosLic, tipo_retorno = 0, considerar_desconto = F)
## End(Not run)
Identifica potencias mercados de risco de praticas colusivas a partir de grafo de licitacoes
Description
Identifica potencias mercados de risco de praticas colusivas a partir de grafo de licitacoes
Usage
rcextRiscoAcaoColusivaAux(grLicitacoes)
Arguments
grLicitacoes |
objeto do tipo |
Value
objeto do tipo environment, contendo os seguintes objetos:
-
cmMercados objeto do tipo
community
contendo todos as comunidades (mercados) obtidas a partir do grafogrLicitacoes
; -
grMercadosRisco grafo do tipo
igraph
contendo os mercados de risco extraidos do grafogrLicitacoes
; -
vcMercadosRisco vetor do tipo
numeric
contendo os identificadores dos mercados considerados de risco; -
vcEmpresasRisco vetor do tipo
numeric
contendo os identificadores dos mercados de risco a que pertencem as empresas consideradas suspeitas de praticarem acoes colusivas. As empresas sao identificadas pelo atributonames
.
Author(s)
Bruno M. S. S. Melo
See Also
igraph
#' @importFrom igraph walktrap.community
Examples
## Not run:
grafoLic <- rodizioMetodologiaGrafoPageRank(grLicitacoes)
## End(Not run)