Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ---
- title: "Análise de dados com R"
- subtitle: "Estudo de Caso: Czech Bank"
- date: "25 de Novembro de 2017"
- author:
- - name: "André Ferreira Bem"
- - name: "Augusto Gonçalves"
- - name: "Fernando D'Imperio"
- - name: "Marcos Vinício de Siqueira"
- affiliation: "Fundação Getulio Vargas - FGV"
- output:
- html_document: default
- ---
- ```{r setup, include=FALSE}
- knitr::opts_chunk$set(echo = TRUE, fig.align='center',fig.height=5,fig.width=6)
- #Instalar os seguintes pacotes:
- package.requirements <- c("ggplot2", "dplyr", "kableExtra", "knitr", "corrplot", "readxl", "GGally")
- #install.packages(package.requirements)
- # Loads all libraries
- lapply(package.requirements, library, character.only = TRUE)
- ```
- ---
- ### 1. ESTUDO DE CASO
- Este trabalho visa auxiliar os gerentes de um banco Czech a entender melhor seus clientes para que os mesmos tenham condições de oferecer melhores serviços aos seus melhores clientes.
- Para esta análise, foi disponibilizado a base de dados do Czech Bank contendo informações de .
- Estes base contém as seguintes tabelas:
- ```{r echo=TRUE, message=FALSE}
- TABELAS <- c ("Client (Clientes)",
- "Account (Contas)",
- "Disposition (Vínculos Clientes x Contas)",
- "Demograph (Informações Geográficas)",
- "Credit Card (Cartões de Crédito)",
- "Loan (Empréstimos)",
- "Permanent order (Ordens Permanentes)",
- "Transactions (Transações)")
- kable(
- TABELAS,
- format = "html",
- align="c",
- caption = "Tabela 1 - Base de dados"
- ) %>%
- kable_styling(
- bootstrap_options = c("striped","hover","condensed"),
- font_size = 10
- ) %>%
- column_spec(
- column = 12,
- border_left = T,
- border_right = T,
- color = "red",
- bold = T
- ) %>%
- row_spec(
- row = 8:10,
- background = "lightblue"
- )
- ```
- ---
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement