3.6 Texto curto com dados gerados

Semelhante aos exemplos anteriores, vamos utilizar o processo aleatório para uma questão cuja resposta é um texto curto. Veja um exemplo na figura abaixo:

Figura 3.6: Questões do tipo texto curto (string) criadas a partir de dados aleatórios. Estão apresentadas 4 versões do mesmo exercício.

^{_{Fonte da figura: O autor}}

E o texto em RMarkdown:

```{r dgp, include = FALSE} 
library(exams)
library(magrittr)
library(knitr)
options(scipen = 999) #prevent scientific notation 

## IATA 10+ movimentados do Brasil
iata10 <- c("GRU","CGH","BSB","GIG","CNF",
            "VCP","SDU","REC","POA","SSA") 
arpt10 <- c("Guarulhos","Congonhas","Brasília","Galeão","Confins",
            "Viracopos","Santos Dumont","Recife","Porto Alegre","Salvador")  
 
## RANDOM DATA 
i <- 1:10 %>% sample(1)

## SOLUTION
iata <- iata10[i]
arpt <- arpt10[i]
```
Question
========
Qual o código IATA para o Aeroporto de `r arpt`?  

Solution
========
O código IATA para o Aeroporto de `r arpt` é `r iata`.

Meta-information
================
exname: codigo
extype: string
exsolution: `r iata`

download exemplo string-dgp.Rmd

Como se trata de uma resposta do tipo texto, primeiro devemos criar um vetor com o teto que será selecionado. O primeito vetor iata10 contém o código IATA dos 10 aeroportos mais movimentados do Brasil. Para criar este vetor, o texto deve estar entre " (aspas) e separados por , (vírgula). O segundo vetor arpt10 contém o nome destes aeroportos.

Em ## RANDOM DATA, sorteamos um número de 1 a 10 que será o aeroporto escolhido para a questão (veja em ## SOLUTION).