2020

library(ggplot2)
library(magrittr)
library(knitr)
library(tidymodels)
library(tidyverse)
library(kableExtra)
theme_set(theme_minimal(14))
options(htmltools.dir.version = FALSE, fig.retina = 2)

Curso-R

Linha do tempo

Comunidade

Nosso discourse: https://discourse.curso-r.com/.

Todos os profs da Curso-R por lá.
Mais pessoas acompanhando e respondendo as dúvidas.
Em um ambiente aberto, as suas dúvidas vão ficar registradas, ou seja, vai contribuir com a comunidade.
Muito melhor para escrever textos que possuem códigos. Com ele, podemos usar o pacote {reprex}!

Nosso Livro

Nossos cursos

tab <- templatesR6::cursos

criar_bloco_cursos <- function (bloco_nome, tab) 
{
    cursos <- tab %>% dplyr::filter(curso_tipo == bloco_nome) %>% 
        dplyr::pull(curso_nome)
    urls <- tab %>% dplyr::filter(curso_tipo == bloco_nome) %>% 
        dplyr::pull(curso_url)
    cor <- switch(bloco_nome, `Programação em R` = "#3bb44a", 
        Modelagem = "#996699", `Extração de dados` = "#eeba30", 
        `Comunicação e automação` = "#ff6699")
    shiny::tags$div(class = "container center", shiny::tags$div(class = "card", 
        shiny::tags$h2(bloco_nome, style = "font-size: 28px;"), shiny::hr(style = paste0("background-color:", 
            cor, ";")), purrr::map2(cursos, urls, templatesR6:::criar_hyperlink_curso)))
}

shiny::tags$div(
  shiny::tags$div(class = "pull-left", 
                  criar_bloco_cursos("Programação em R", tab), 
                  shiny::tags$br(), 
                  criar_bloco_cursos("Comunicação e automação", tab)), 
  shiny::tags$div(class = "pull-right", 
                  criar_bloco_cursos("Modelagem", tab), 
                  shiny::tags$br(), 
                  criar_bloco_cursos("Extração de dados", tab))
  )