|
| 1 | +--- |
| 2 | +output: github_document |
| 3 | +params: |
| 4 | + turma: 202102-intro-programacao |
| 5 | + nome_curso: ATUALIZANDO.... |
| 6 | + download_material: 'TRUE' |
| 7 | +--- |
| 8 | + |
| 9 | +<!-- README.md is generated from README.Rmd. Please edit that file --> |
| 10 | + |
| 11 | +```{r, include = FALSE} |
| 12 | +knitr::opts_chunk$set(collapse = TRUE, comment = "#>", echo = FALSE, |
| 13 | + warning = FALSE, message = FALSE) |
| 14 | +
|
| 15 | +path_to_url <- function(path) { |
| 16 | + path |> |
| 17 | + tibble::tibble(file = _) |> |
| 18 | + dplyr::mutate( |
| 19 | + url = file |> |
| 20 | + paste0("https://curso-r.github.io/", params$turma, "/", ... = _) |> |
| 21 | + paste0("[", fs::path_file(file), "](", ... = _, ")") |
| 22 | + ) |> |
| 23 | + dplyr::select(url) |
| 24 | +} |
| 25 | +``` |
| 26 | + |
| 27 | +## Informações importantes |
| 28 | + |
| 29 | +```{r results = 'asis'} |
| 30 | +# Baixar o ZIP do repo da turma (o repo principal não vai ter os scripts feitos em aula) |
| 31 | +if (params$download_material == "TRUE") { |
| 32 | + glue::glue("- [Clique aqui](https://github.com/curso-r/{params$turma}/archive/refs/heads/main.zip) para baixar o material do curso.") |
| 33 | +} |
| 34 | +``` |
| 35 | + |
| 36 | +- Nosso blog: [https://curso-r.com/blog/](https://curso-r.com/blog/) |
| 37 | + |
| 38 | +- Nosso fórum: [https://discourse.curso-r.com/](https://discourse.curso-r.com/) |
| 39 | + |
| 40 | +- Nossos livros: |
| 41 | + - [Ciência de Dados em R](https://livro.curso-r.com/) |
| 42 | + - [Zen do R](https://curso-r.github.io/zen-do-r/) |
| 43 | + - [Programando em Shiny](https://programando-em-shiny.curso-r.com/) |
| 44 | + - [Beautiful R](https://curso-r.github.io/beautiful-r/) (em inglês) |
| 45 | + |
| 46 | + |
| 47 | + |
| 48 | +## Dúvidas |
| 49 | + |
| 50 | +Fora do horário de aula ou monitoria: |
| 51 | + |
| 52 | +- Perguntas gerais sobre o curso deverão ser feitas no Classroom. |
| 53 | + |
| 54 | +- Perguntas sobre R, principalmente as que envolverem código, deverão ser enviadas no [nosso fórum](https://discourse.curso-r.com/). |
| 55 | + |
| 56 | +## Slides |
| 57 | + |
| 58 | +```{r} |
| 59 | +"slides/" |> |
| 60 | + fs::dir_ls(glob = "*.html", fail = FALSE) |> |
| 61 | + path_to_url() |> |
| 62 | + dplyr::select(Slide = url) |> |
| 63 | + knitr::kable() |
| 64 | +``` |
| 65 | + |
| 66 | + |
| 67 | +## Scripts utilizados em aula |
| 68 | + |
| 69 | +```{r} |
| 70 | +"exemplos_de_aula/" |> |
| 71 | + fs::dir_ls(fail = FALSE) |> |
| 72 | + path_to_url() |> |
| 73 | + dplyr::select(Exemplo = url) |> |
| 74 | + knitr::kable() |
| 75 | +``` |
| 76 | +## Práticas |
| 77 | + |
| 78 | +```{r} |
| 79 | +"praticas/" |> |
| 80 | + fs::dir_ls(fail = FALSE) |> |
| 81 | + path_to_url() |> |
| 82 | + dplyr::select(Exemplo = url) |> |
| 83 | + knitr::kable() |
| 84 | +``` |
| 85 | + |
| 86 | +## Lição de casa |
| 87 | + |
| 88 | +```{r} |
| 89 | +"exercicios/" |> |
| 90 | + fs::dir_ls(fail = FALSE) |> |
| 91 | + path_to_url() |> |
| 92 | + dplyr::select(Exercício = url) |> |
| 93 | + knitr::kable() |
| 94 | +``` |
| 95 | + |
| 96 | + |
| 97 | +## Material extra |
| 98 | + |
| 99 | +Referências extras relacionadas com o conteúdos das aulas, ou materiais que |
| 100 | +comentamos quando tiramos dúvidas (não necessariamente são relacionadas com o |
| 101 | +conteúdo da aula). |
| 102 | + |
| 103 | + |
| 104 | +```{r echo=FALSE, message=FALSE, warning=FALSE} |
| 105 | +arquivo_csv_materiais <- "extras.csv" |
| 106 | +if (file.exists(arquivo_csv_materiais)) { |
| 107 | + arquivo_csv_materiais |> |
| 108 | + readr::read_csv2(show_col_types = FALSE) |> |
| 109 | + knitr::kable() |
| 110 | +} else { |
| 111 | + cat("Em breve!") |
| 112 | +} |
| 113 | +``` |
| 114 | + |
| 115 | +## Redes sociais da Curso-R |
| 116 | + |
| 117 | +- Youtube: https://www.youtube.com/c/CursoR6/featured |
| 118 | + |
| 119 | +- Instagram: https://www.instagram.com/cursoo_r/ |
| 120 | + |
| 121 | +- Twitter: https://twitter.com/curso_r |
| 122 | + |
| 123 | +- Linkedin: https://www.linkedin.com/company/curso-r/ |
| 124 | + |
| 125 | +- Facebook: https://www.facebook.com/cursodeR |
| 126 | + |
| 127 | +```{r include = FALSE} |
| 128 | +# Criar arquivo _config.yml |
| 129 | +if (params$download_material == TRUE) { |
| 130 | + content <- glue::glue( |
| 131 | + "theme: jekyll-theme-minimal", "\n", |
| 132 | + "logo: assets/logo.png", "\n", |
| 133 | + "title: {params$nome_curso}", "\n", |
| 134 | + "show_downloads: true", "\n", |
| 135 | + "link_material: 'https://github.com/curso-r/{params$turma}/archive/refs/heads/main.zip'", |
| 136 | + "\n" |
| 137 | + ) |
| 138 | +} else { |
| 139 | + content <- glue::glue( |
| 140 | + "theme: jekyll-theme-minimal", "\n", |
| 141 | + "logo: assets/logo.png", "\n", |
| 142 | + "title: {params$nome_curso}", "\n", |
| 143 | + "show_downloads: false", "\n" |
| 144 | + ) |
| 145 | +} |
| 146 | +
|
| 147 | +readr::write_lines(content, "_config.yml") |
| 148 | +``` |
0 commit comments