_index.Rmd

---
title: Início
description: ""
toc: false
disableReadmoreNav: true
disable_comments: true
---

```{r loading-pkgs,echo=FALSE,warning=FALSE,message=FALSE}
# Carregando os packages que serão usados.
library(magrittr)
library(kableExtra)
library(shiny)
library(tidyverse)
library(ggplot2)
library(ggplotify)
library(plotly)

# Chunk config
knitr::opts_chunk$set(echo=FALSE,message=FALSE,warning=FALSE)

# Scripts
base::source(file = "../R/personagens_back_end.R", encoding = "UTF-8")
base::source(file = "../R/personagens_front_end.R", encoding = "UTF-8")
```

```{r hero}
tags$div(class="container-fluid",
    tags$div(class="row",
             style="background-image: url('./bg.jpg');",
             style="background-repeat: no-repeat;
                    background-size: cover;
                    background-position: center center;
                    width: 100%;",
        tags$div(class="container-fluid",
                 style="text-align: center; align-content: center;",
                 tags$br(),
                 tags$br(),
                 tags$span(class="fa fa-exclamation-triangle fa-10x",
                           `aria-hidden`="true",
                           style="color:#ffac00"),
                 tags$br(),
                 tags$br(),
                 tags$h1(class="genshin_font",
                    style="color: #1c1c22",
                    "Site em construção"),
                 tags$br(),
                 tags$br())
        )
    )
```

```{r lead}
lead_wrapper(message = "Esse site é um exercício de programação. Muitos dos dados foram obtidos diretamente na internet.")
```

```{r twitter}
tags$div(class="container-fluid",
    tags$div(class="row",
        tags$div(class="col-6",
            tagList(
                tags$a(class="twitter-timeline",
                   href="https://twitter.com/GenshinImpact"),
                tags$script("async",
                            src="https://platform.twitter.com/widgets.js",
                            charset="utf-8")
                )
            ),
        tags$div(class="col-6",
            tags$h4("Mapa"))
        )
    )
```