In curso-r/CursoRTarefas: What the Package Does (One Line, Title Case)

# remotes::install_github("curso-r/CursoRTarefas")
library(CursoRTarefas)
CursoRTarefas::adicionar_chunk_setup() 

CursoRTarefas::adicionar_codigo_pre_tutorial(curso = "Introdução à programação com R",
                              url = "https://loja.curso-r.com/introduc-o-a-programac-o-com-r.html")

Dataframes

A base de dados airquality apresenta dados de qualidade do ar obtidos diariamente, em Nova York, entre os meses de maio e setembro de 1973:

airquality

airquality

Use o dataframe airquality para responder às questões abaixo:

a) Use uma função em R para descobrir quantas colunas a base airquality tem:

___(airquality)

ncol(airquality)

grade_this({
  if (identical(.result, .solution)) {
    pass("Muito bom! Você contou as colunas corretamente.")
  }
  fail()
})

b) Quantas linhas airquality tem?

___(airquality)

nrow(airquality)

grade_this({
  if (identical(.result, .solution)) {
    pass("Muito bom! Você contou as linhas corretamente.")
  }
  fail()
})

c) Execute a função head(). O que essa função retorna?

head(airquality)

question("O que a função `head()` retorna?",
  answer("A função `head()` retorna as últimas linhas de um dataframe"),
  answer("A função `head()` retorna as linhas aleatórias de um dataframe"),
  answer('A função `head()` retorna as primeiras linhas de um dataframe', correct = TRUE),
  allow_retry = TRUE,
  random_answer_order = TRUE,
  correct = "Correto! Parabéns. A função `head()` é útil para observar as primeiras linhas de um dataframe. <br> Curiosidades: <br> - A função `tail()` é similar, porém apresenta as últimas linhas. <br> - A função `dplyr::slice_sample(airquality, n = 6)` nos permite buscar linhas aleatórias na base de dados, usando o número de linhas que queremos no argumento `n`.",
  incorrect = "Incorreto. Tente novamente :) <br> Dica 1: Experimente clicar em `Executar código` e observar os resultados." 
)

d) Quais são os nomes das colunas?

___(airquality)

colnames(airquality)

grade_this({
  if (identical(.result, .solution)) {
    pass("Muito bom! Você consultou o nome das colunas corretamente. Existe mais de uma função que possibilita conferir o nome da colunas de um dataframe, como:  `colnames()` e `names()`.")
  }
  fail()
})

e) Qual é a classe da coluna Ozone? Dicas: class() e $

class(airquality______)

class(airquality$Ozone)

grade_this({
  if (identical(.result, .solution)) {
    pass("Muito bom! Você verificou a classe da coluna Ozone corretamente.")
  }
  fail()
})

f) Execute o seguinte código dplyr::glimpse(airquality), e observe o que ele retorna.

dplyr::glimpse(airquality)

question("O que o código `dplyr::glimpse(airquality)` retorna? Selecione todas as opções válidas:",
  answer("Número de linhas de uma base de dados", correct = TRUE),
  answer("Número de colunas de uma base de dados", correct = TRUE),
    answer("Nome das colunas de uma base de dados", correct = TRUE),
  answer("Classe das colunas de uma base de dados", correct = TRUE),
    answer("Observações das primeiras linhas em uma base de dados", correct = TRUE),
    answer("Observações das últimas linhas  em uma base de dados"),
      answer("Observações de linhas aleatórias em uma base de dados"),
      answer("A média dos valores de cada coluna"),
  allow_retry = TRUE,
  random_answer_order = TRUE,
  correct = "Muito bom! A função `glimpse()` do pacote `dplyr`retorna várias informações interessantes sobre uma base de dados, como: o número de linhas, número de colunas, nome das colunas, classe de cada coluna e as primeiras observações da coluna, para ter uma ideia dos dados disponíveis. ",
  incorrect = "Incorreto. Tente novamente :) <br> Dica 1: Experimente clicar em `Executar código` e observar os resultados." 
)

g) Utilizando a resposta da questão anterior, quais são os tipos de cada coluna da tabela airquality?

question("Quais são os tipos de cada coluna da tabela `airquality`?",
    answer("Todos são numéricos"),
  answer("Todos são textos"),
  answer("Há uma coluna Double (números que aceitam casas decimais) e as outras são integer (número inteiro).", correct = TRUE),
  allow_retry = TRUE,
  random_answer_order = TRUE,
  correct = "Muito bom! :)",
  incorrect = "Incorreto. Tente novamente :) <br> Dica 1: Experimente clicar em `Executar código` e observar os resultados." 
)

Enviar as respostas

Se você completou a tarefa e quer submeter, clique no botão abaixo ('Generate') para gerar o seu código hash e envie usando o formulário a seguir:

learnrhash::encoder_logic()

learnrhash::encoder_ui(ui_before = " ", ui_after = " ")

CursoRTarefas::adicionar_codigo_pos_tutorial(url_form = params$url_form)

curso-r/CursoRTarefas documentation built on Feb. 13, 2022, 3:21 p.m.